3«lt5ia 

" your BASIC software magazine" 

October 1979 • $2.00 




TM 



Celebrating Our 
First Anniversary 
Issue With . . . 



im 




"Data 
Diibber 
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TRS-80 Program Tape 

Yes, even those in machine language! Feed your 
cassette into the "Data Dubber" ancfget out exact 
replicas of the TRS-80 CSAVE data pulses. Obtain 
perfect CLOAD's even from tapes with hum, distor- 
tion, or minor dropouts . . . and w/lthout constantly 
adjusting the volume. Connect a second cassette to 
the "Data Dubber" and make perfect reproductions 
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The "Dubber" works with Level I or II and costs only 
$39.95, postage paid. Start your own software 
business. Pays for itself in time saved and reduced 
tape cost. Order the "Data Dubber" today! If you 
are not completely satisfied with its performance 
simply return it for full refund. 
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oureoina mniL 

by George Blank 

According to your replies to our June Poll on Software Suppliers, 
ttiere is a higti rate of satisfaction among those purchasing from the 
TRS-80 Software Exchange. Only (Vlichael Schrayer Software (the 
Electric Pencil) had more favorable ratings. Passing over the sup- 
pliers for which less than ten replies were received, Michael 
Schrayer, TSE, Small Systems Software, G2, and Lifeboat 
Associates rated significantly above average. The rating for G2 
should be qualified however, as it is an average of very high ratings 
(usually mentioning Level III BASIC) and rather low ratings for other 
products. 

After Radio Shack (let's face it; every TRS-80 owner has heard of 
Radio Shack) and the TRS-80 Software Exchange (most SoftSide 
subscribers fiave heard of it) with 145 and 116 ratings respectively, 
the apparent best selling software suppliers are Instant Software, 
CLOAD magazine. Sensational Software, and Small Systems Soft- 
ware. Since Small Systems Software has higher prices for their 
average items then the other three, we suspect that they are doing 
better than the others. Their high ratings and excellent programs 
make this a well-deserved tribute. 



Our own experience with programmers who have software for sale 
with other suppliers (your editor is one of them) leads us to suspect 
that we sell at least 50 percent more software than any other in- 
dependent software supplier. Unfortunately, from our viewpoint, 
Radio Shack probably sells more than all the independents, in- 
cluding TSE, put together. 

We did not conduct this survey out of idle curiosity. If you will look 
through the Market Basket in the back of this issue, you will find that 
we sell the software of all the top rated suppliers, as well as some 
items that are usually not sold directly by the orginating firm. The 
TRS-80 Software Exchange is your single source for top quality soft- 
ware form Microsoft, Apparat, Miller Microcomputer Service, Small 
System Software, and others, including our own authors. We also in- 
vite you to compare our speed with the others, especially when you 
use our new telephone WATS line. TSE gives the fastest delivery on 
the best software. 

We also received a few brickbats in with our kudos. The worst pro- 
blems tended to be with missing documentation. Apparently quite a 
few of our programs have been mailed out without the accompany- 
ing instructions. We are deeply embarrassed, and sympathize with 
the customer who receives a system tape and can't load it 
because he doesn't know the title, or who can't make sense of a 
game because the instructions are missing. We are making changes. 
For one thing, we will now use pink labels for programs that receive 
instructions separately, and yellow labels for ones without instruc- 
tions, so that our mailroom staff can keep track of them more easily. 
Please call on the toll-free line (1-800-258-1790) if you think you have 
received a program without instructions. 

We also had our attention called to a few bugs in some of our pro- 
grams. They are being corrected, and we are making up a problem 
notebook to record problems noted and appropriate solutions. We 
will correct the programs before further sales, offer corrections in 
the magazine, tell callers what the problems are on the telephone, 
and even send out listings of the solutions for errors upon request. 
Our growth these past fourteen months has been explosive, but we 
now have a larger staff and are going all out for quality. 

It has been my pleasure as editor to receive an advance look at the 
manuscript for a new and desperately needed TRS-80 publication, 80 
Software Critique. The manuscript I saw was fifty pages long and 
contained full reviews of fifty programs. The reviews were well done 
(of course I agreed with some and disagreed with others!) and even 
listed bugs and their solutions. This new quarterly is $24 a year from 
80 Software Critique, P.O. Box 134, Waukegan, IL 60085. 

For those of you who prefer charts and numbers to comments, we 
will close the editorial this month with the results of the June poll In 
chart form. Our apologies to Hayden Publications for leaving them 
off the poll. They also have excellent programs. 




Softv\/are Supplier 


Replies 


Average Rating 


Michael Sctirayer (Electric Pencil) 


21 


8.0 


TRS-80 Softw/are Exchange 


116 


7.4 


Small Systems Software 


47 


7.0 


G2 (Level III Basic) 


35 


6.8 


Lifeboat Associates 


10 


6.5 


Personal Softvi^are 


41 


6.1 


Computronics 


40 


5.9 


CLOAD magazine 


54 


5.8 


Instant Softv\/are (Kilobaud) 


55 


5.6 


Sensational Software (Creative Comp.) 


51 


5.5 


People's Software (TRS-80 Computing) 


34 


5.2 


The Bottom Shelf 


37 


5.2 


Mad Hatter Software 


41 


5.1 


Radio Shack 


145 


5.0 


Software 80 


22 


4.8 



(The following suppliers received less than ten responses) 


Practical Applications 
Level IV 
ACS Services 
Hobby World 
FMG Corporation 
Micro Architect 
Computrex 


4 
9 
5 
8 
6 
8 
8 


7.3 
6.1 
5.8 
5.3 
5.2 
4.6 
3.1 



Feed your 



Coming soon to a 
distributor near you. 




Lifeboat Associates, specialists In microcomputer disk software, Is proud 
to offer the first professional dlsK-t)ased language and utility package tor 
ttie Radio Shack TRS-80 computer. Written by Microsoft, creators of Level 
II BASIC, the package runs on a TRS-80 system witti 32K RAM, one or more 
drives and TPSOns Thn nnttware Is supplied on diskettes and consists of: 

FORTRAN a true relocatable machine code compiler for 

ANSI FORTRAN X3.9 (except COMPLEX variables). 

MACRO ASSEMBLER a disk-based macro assembler 

utilizing Zilog mnemonics and producing relocatable 

code. 

LINKING LOADER a link-edit and load FORTRAN and 

assembler modules for execution. 

SUBROUTINE LIBRARY a complete library of 

subroutines existing as relocatable linkable modules for 

Fortran or assembler programs - e.g., double precision 

square root, natural log, transcendentals, etc. 

DISK TEXT EDITOR to create and modify for- 

tran and assembler programs as disk files: also can be 

used as a general purpose text editor for corresponence 

and other documents. 

TRS-80 TRANSFORMED 
WITH PROFESSIONAL 

^^^1 F^TlAr ^V p) F* ^^'^ high-powered professional 
wV^I I WWr^llfc software package with full 
Q « ^\ 1^ A ^\ pO documentation Is available at the 

r AU IxMVa CO DISCOUNT PRICE OF $150. 

PER COMPUTER SYSTEM 

The Maro Assembler, Loader, Editor, and Cross 
Reference Utilties alone $80. 

The Fortran Compiler, Loader, Editor, and extensive 
library of scientific functions alone $30, 




TRS-80 Software Exchange 
6 South St.. Milford. NH 03055 (603) 673-5144 



TIRED OF DISK ERRORS? 

STOP BLAMING YOUR DRIVES - 
FIX YOUR DOS! 

NEWDOS, by Apparat, is the third generation disk operating 
system for your TRS-80. NEWDOS corrects over 70 errors and 
omissions in TRSDOS 2 1 and disk BASIC, yet the two are 
completely compatible! Programs and files saved under one can 
be used with the other interchangeably. Going from TRSDOS 
2.1 to NEWDOS is like going from Level I to Level II: more 
power, more convenience, greater speed. 



NEWDOS NEWDOS+ 



• Use all DOS commands 
(incl. directory) in BASIC 
Automatically load and run 
a BASIC program 

on power-up 

• Produce variable cross- 
reference tables 

• Open 'E' to add to 
sequential files 

• Append files 

• Use your line printer as 
a screen printer 

• Renumber BASIC programs 

• End keyboard bounce 



Editor/Assembler for disk • 
Disassembler • 
(Z80 machine code) 
LM Offset-allows transfer of any • 
system tape to a disk file 
(automatically relocated) 
BASICI-Level one BASIC • 
saved on disk 

LV1DSKSL - not a typo, this • 
saves and loads BAS1C1 
programs to disk 
DIRCHECK-testsand lists • 
disk directory 

SUPERZAP-display/print/modify • 
any location in memory or on disk 



And, best of all, say goodbye to system crashes, lost data and 
wasted time caused by your old, bug-ridden system software. 
Apparafs NEWDOS is fully documented and available for 
only $49.95. NEWDOS -I- , Just $99.95 

NOTE: UsG of this software may require documentation 
available only with the purchase of Radio Shack TRSDOS 2 1 
and/or the Radio Shack Editor/Assembler. 
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Ulhcil Kinclof Work 
Dolbu CaJouZ 




by G. P. Cocanour 

If a computer hobbyist were to collect a dime everytlme he was ask- 
ed, "What are you going to do with it?", i'm sure he could purchase 
an additional 4K of RAM In short order and if he's one of those old 
timers, at least a floppy disk. My general reply covers a multitude of 
things, but, almost always fits into one of two categories. The first 
category Is the constructive one. The one that makes my life easier 
by keeping records, balancing the checkbook, and telling how to 
keep the budget In line. The second category, the one I enjoy the 
most. Is recreation. Oh, the games you can play, and the hours you 
can spend. The price tag Is small ! 1 1 

However, showing someone your computer and keeping his or her In- 
terest Is a tall order to fill If these someones range from small 
daughter, to an old neighbor, with your wife thrown In for good mix- 
ture. The first good rule of thumb when showing off your computer is 
to involve that person directly with the computer. So, how about a 
game? Maybe a Star War of some kind? Or, how about the ageless 
game of NIm? Well, games are good, but I've found that generally 
the rules are too complicated and lengthy to understand, or, too sim- 
ple and are of no challenge to the individual. Besides, after losing to 
a computer, most people's egos are ready to eliminate the word com- 
puter from the dictionary. The question is . . . what can we use? After 
a few days of musing the idea, (see, I don't have very fast access 
time) I recalled an article my wife had shown me In a Family Circle 
magazine. It was a test and the reason she had brought it to my at- 
tention was because of the difflcult-to-understand scoring direc- 
tions. This test was the jewel I was looking for. It seems this Doctor 
Dichter fellow had come up with a test you can't fall (where was he 
when I was going to school?). Not only that, this test involves the 
person In a very special way. The test is designed to tell him 
something about himself that maybe, just maybe, he doesn't know - 
--like what kind of work does he enjoy doing? 

Doctor DIchter's test Is very short and easy to understand. The test is 
comprised of eight questions regarding your working preferences, 
such as in a group of people or all alone, or with tangible items, or 
abstract ideas. Out of these eight questions and answers comes one 
or several occupational areas which are suitable for you. It's only 
fair to mention that this Is a very broad test and only Includes 27 oc- 
cupational areas. Also remember, this test only tells you the type of 
work you would enjoy, not necessarily a job you are able to do. 

This program requires 16K and will work In either Level I or II. The 
Level I users must substitute the lines 25 & 80 as remarked in the pro- 
gram listing. Level i users must also press ENTER after selecting an 
answer. 

I feel this test does Its job convincing people of some of the 
usefulness of a home computer. What I'm worried about now is all 
the telephone calls I've been receiving asking if they can bring over 
their friends and show them the computer test. 

10 



10 REM FROM FIWILV CIRCLE 1/77, PfflX 4, ARTICLE of DICHTER 
2f* REM PROGRWI WRITTEN BY G. P. COCflNOUR 

25 DIMfl(27):C=i 

26 REM *** LEVEL 1 USE THIS LINE *** 25 C=l 
25 GOTOiee 

K FORfl=lTO3:L=INT(M):fi(L)=fl(L)+l:M=M-L;M=M*ie0+. 0005:L=INT(N);fl 

(L)=fl(L)+l ; N=N-L : N=N*100+. 6685 : L=INT (0) : R(L)=fl(L)+l : 0=0-L ; 0=0*18 

8+.80e5:L=INT(P):fl(L)=fl(L)+l:P=P-L:P=P*l^+.8005:L=INT(R);R<L)=fl 

<L)+1;R=R-L;R=R*180+. 8605: NEXT 

60 M=0 : N=0 : 0=8 : P=0 ; R=0 : C=C+1 : ONCGOTO100, 200, 300, 400, 506, Sm, 708, 

800,868 

75 PRINTe%0, "VOUR RNSWER PLEflSE"j 

^ Z$=INKEV$: IFZ$=""THEN80ELSEB=VflL(ZI) ;CLS:RETURN 

81 REM **♦ LEVEL 1 USE THIS LINE *+* 88 INPUT B:CLS: RETURN 

108 CLS:PRINT"RELflT10N TO COLLEFtGUES. HOW DO VOU PREFER TO RELfl 

TE TO" 

105 PRINT"OTHERS IN VttIR JOB?": PRINT: PRINT 

110 PRINT"(1) RS fl LEFDER RMONG CO-WORKERS. ":PRINT 

120 PRINT" (2) BEING TOLD WHAT TO DO BV OTHERS": PRINT 

125 PRINT" (i) WITH SOME COLLERGUES m THE SRME LEVEL OTHERS BE 

LOW": PRINT 

130 PRINT"(4) I WANT TO BE INVOLVED WITH OTHERS" :PRINT 

135 G0SUB75 

140 ONBGOTO1000, 1^5, 1018, 1815 

150 GOTO100 

200 CLS;PRINT"riRTERIRLS. WHAT TVPE OF MATERIALS DO VOU PREFER T 

0" 

205 PRINT"WORK WITH?": PRINT: PRINT 

210 PRINT "(1) WOOD, STEEL, STONE": PRINT 

215 PRINT" (2) TEXTILES, PLASTIC": PRINT 

226 PRINT"<3) PRINT, TILE":PRINT 

225 PRINT" (4> PAPER, BOOKS" :PRINT 

230 PRINT" <5) PEOPLE": PRINT 

235 6-050675 

240 ONBGOTO2068, 2605, 2818, 2615, 2026 

258 QOTO200 

380 CLS:PRINT"REWARDS. WHAT TVPE OF REWARDS DO VOU PREFER?" :PR 

INT: PRINT 

305 PRINT" (1) NORriAL PflV, NO RISK": PRINT 

316 PRINT" (2) GOOD PRY, SOME RISK": PRINT 

It 



315 PRINT" (3) EXCELLENT PflV. LOTS OF RISKS": PRINT 

326 G0SUB75 

330 ONBQOTO3900, 3865, 3016 

340 GOTO300 

406 CLS:PRINT"RELRTION TO COMPflNV. WHAT KIND OF RELATIONSHIP U 

ITH fl" 

405 PRINT"COMPFlNV OR GROUP DO VOO PREFER?" :PkINT; PRINT 

410 PRINT"(1) BEING fl COG IN THE MACHINE" ;PRINT 

415 PRINT"(2) BEING AN INTE(SFL PART OF THE OPERATION"; PRINT 

420 PRINT"(3) BEING A BIG WHEEL IN THE COMPANV"; PRINT 

425 G0SUB75 

430 ONeGOTO4000, 4065, 4616 

440 GCITO400 

5ffi aS:PRINT"SOCIABILITV. HOW DO VOL) PREFER TO RELATE TO INDI 

VIDUflS" 

505 PRINT" IN A JOB?": PRINT: PRINT 

510 PRINT" (i) WORKING ALONE" :PRINT 

515 PRINT"(2> WORKING WITH ONE PERSON" :PRINT 

K6 PRINT"(3) ^LONGING TO A SMflL GROUP" :PRINT 

525 PRINT"(4) BELONGING TO fi LARGE GROUP" :PRINT 

530 G0SUB75 

548 ONBGOTO5080, 5005, 5610, 5015 

556 QOTa500 

660 aS:PRINT"RESULTS. WHAT KIND OF RESULTS DO VOU PREFER?": PR 

INT: PRINT 

6^ PRINT"(1) IMtlEDIATELV VISIBLE": PRINT 

610 PRIHT"C2) VISIBLE WITHIN ft SHORT TII1E":PRINT 

615 PRINT"(3) VISIBLE IN ONE MONTH" :PRINT 

620 PRINT"c:4) VISIBLE IN TH?EE I1CWTHS":PRINT 

625 PRINT"(5) VISIBLE IN ONE VEAR":PRINT 

636 PRINT"(6) hEVER VISIBLE" :PRINT 

635 Q0SUB75 

646 ONBGOTO6000, 6605, 6016, 6015, 6626, 66 

650 GOTO6e0 

700 CLS:PRINT"TE«PO AND RHVTHM. WHAT TEMPO, OR PACE OF WORK, I 

S mST" 

705 PRINT "PLEASING TO VOU?": PRINT: PRINT 

716 PRINT" (1) AN EVEN PROGRESSION" : PRINT 

715 PRINT"(2) SECURE AND PROTECTED, QUIET" ;PRINT 

720 F'RINT"(3) UPS AND DOWNS, LOTS OF EXCITEMENT": PRINT 

12 



725 PRINT" (4) fl REGULW? RHVTHM"; PRINT 
738 G0SUB75 

749 ONBGOTO7ee0, 7865, 7818, 7815 
758 GOTO7e0 

880 CLS;PRINT"BODV. WHICH PART OF THE BODY DO YOU WANT TO BE E 
MPLOYED" 

805 PRINT"MOST OF THE TIME IN YOUR MORK?":PRINT 
818 PRINT" (1) EYES": PRINT 
815 PRINT" (2) BRflIN": PRINT 
828 PRINT" (2) HflNDS"; PRINT 
825 PRINT" (4) LEGS"; PRINT 
838 PRINT" (5) f«HS"; PRINT 
835 PRINT" (6) TOTRL BODY": PRINT 
848 Q0SUB75 

850 ONBGOTO8000, 8885, ^10, 8015, &d, 8025 
855 G0T0886 
860 H=9:I=0 

870 PRINT"THE TYPE OF WORK YOU MIGHT ENJOY DOINij" 
880 G0SUB975 
890 IFI>2G0T0918 
899 Z=0:X=14 
980 H=H-1:GOTO880 

910 INPUT"PRESS ENTER TO CONTINUE", B$:CLS:PRINT"THE TYPE OF WORK 
VOU MIGHT NOT ENJOY DOING" 
920 H=e:I=0 
930 G0SUB975 
948 IFI>=2QOTO960 
950 H=H+1:GOTO930 

960 INPUT"PRESS ENTER TO TAKE THE TEST ftGRIN"iB$:RUf< 
975 RESTORE 

988 F0RG=1T027:REF«) fl$ 
985 IFH=fl(G>G0SUB995 
990 NEKTG: RETURN 
995 PRINTfi$: 1=1+1: RETURN 
1000 M=5. 1013:N=14. 1819:0=28. 2225 : P=26 : 1jOTO50 
1005 M=9. 24:GOTO50 
1018 M=2. 0106 :N=7. 1627:GOTO50 
1615 M=ll, 1215:N=2i:GOTO50 
2086 M=1.0327:GOTO50 
2005 M=2. 06:GOTO50 

13 



2910 11=4. 15.G0TCIM 

2015M=16.17;GOTO50 

2626 M=5. 09i0:N=i2. 1828; 0=21. 2225 : P=26 : QOTC60 

3M0 M=6. 0708:N=11. 1212:0=15. 16;P=2I 27;GOTO50 

2805 P1=2. 1418:N=19. 2024:0=25. 26:GOTO50 

2010 11=1. 0204 :N=5. 0910:0=17:007050 

4860 11=12.1516:001050 

4005 11=1. 0206 :N=7. 8809:0=11. 1921:P=22. 27:GOT0.58 

4010 11=2. 0405:N=10. 1718:0=29. 2224:P=25. 26:GOTO50 

5080 t1=l. 0202 : N=4. 0514 : 0=17. 2222 : P=24. 2526 : QOTO50 

5^5 t1=6. 0708:N=16. 1819:0=21 27:GOTO50 

5010 11=9. 1015 :N=20:GOTa50 

5915 t1=li.l212:GOTO50 

6006 11=6. 0825:N=26. 27:GOTO50 

6005 11=7. 0911:N=12. 1415:0=18. 1920 :P=24: 001056 

6010 M=2. 0410:N=16. 22:GOTO50 

6015 11=1. 0205 :N=i2. 1721 :G0T05i3 

6020 t1=22:GOTO50 

72m H=1116:GOTO50 

7005 11=2. 0406 : N=7. 1215 : 0=19. 2821 : P=22. 27 : GOTO50 

7010 t1=l 0205 :N=8. 0912:0=14. 1822:GOTO50 

7015 11=10. 1724:N=25. 26:GOTO50 

3000 11=1. 0262 :N=5. 0607:0=8:001058 

mm H=6. 8710:N=12. 1516:0=17. 1819:P=20. 2122:R=22. 24:QOTO50 

8016 H=2. 04:GOTO50 

8015 M=9. 1112:001050 

^25 11=12. 1425:N=26. 27:GOTO50 

9800 DflTflWiCHITECT, INT. DECORATOR. SCULPTOR.^ PAINTER. ENTREPRENEUR 

9010 DflTAFflSHlON DESIGNER. FURNITURE DESIGNER, LflVOUT ARTIST, SALES 

9020 DATAPROtlOTION, NURSE, CHILD CARE, TEACHER, PHVSICAN, SECRETffiilV 

9020 DATALIBRARIAN, WRITER, MANAGER, BUYER, ADMINISTRATOR, RESEARCH 

9840 DATASCIENTIST, COPYWRITER, JOURNALIST, PERFORMER, SINGER, tlOTCL 
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In the beginning there was Lev^' ! 

THEN THERE WAS LEVEL li 

NOW -LEVEL III BASIC 



Now do more than ever before 

With the most powerful Basic vou can buv 

For the TRS-80. 

Open the manual and load the cassette. Then get ready to work with the most powerful Basic interpreter 
you've ever had your hands on . . . Level III Basic for Radio Shack Computers. It loads right on top of the 
Level II ROM, and in just 5K of space, opens up your capabihty lo new dimensions. For starters, this new 
cassette-based interpreter gives you the whole catalog of disk programming power. Plus graphics commands. 
Plus Powerful editing commands. Plus long error messages, hex and octal constants and conversions, user 
defined functions and a number of commands never before available on either cassette or disk interpreters! 

EASIER LOADING, FEWER KEYBOARD ERRORS . G2 Level III Basic eliminates aggravations you've 
had, including keyboard "bounce" and those super-sensitive tape deck settings. Programs will load easier, 
and youll have far less trouble with input errors. 

BASIC ACCESS TO RS-232 . Until now, if you wanted to access your RS-232 interface, you had to work in 
assembly language. 02 Level 111 Basic does the work for you, letting you use your interface with Basic 
statements 

HAVE YOU WISHED FOR MORE POWER ? This new interpreter gives you 10 machine language user calls 
for subroutines, long error messages, a new TIMES call for your real time accessory, plus measure ot limit 
input liming that lets you put a time limit on responses when you're playing games or giving exams. And the 
list doesnt stop here. 

EASIER AND MORE POWERFUL GRAPHICS . This new Basic includes three simple commands that can 
eliminate dozens of program steps. PUT transfers information from a designated array to your screen; GET 
reverses the process. LINE makes your computer do the work when you input beginning and end points. 
Give it twodiagonally opposite corner locations, and itil outline the rectangle you're looking for. 

a>iLY MICROSOFT COULD DO IT . G2 Level III Basic was created by Microsoft, the same company that 
wrote Level II Basic for Radio Shack. And it actually uses Level li as a foundation for this enhanced add-on. 
By the time you've mastered all it can do, calling up the flexibility of the graphics commands, and even 
enjoying the convenience of renumbering, youll wonder how it was all possible. It's like getting a whole new 
computer for your computer. 

AVAILABLE NOW FOR ONLY $49.95 . You get the power that might otherwise cost you hundreds of dollars 
in additional equipment for only $49.95. Price includes the Users Manual, a Quick Reference Card, and a 
preprogrammed cassette tape. Load the tape, open the manual, and get ready to work with the most 
powerful Basic Interpreter you've ever had your hands on. Level III Basic for the TRS-80. 

^ TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET, MILFORD, NH 03055 
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A UTILITY PROGRAM 

THAT GREATLY EXTENDS 

THE KEYBOARD, VIDEO, 

AND PRINTER 
SUBROUTINES IN YOUR 
LEVEL II ROM! 



Lance Micklus 



KVP runs under DOS or Level II BASIC. It Is relocatable under your 
control, and so may be used simultaneously with other machine 
language programs. At least 16K of memory is required. 

Here are some of the 
things you'll be able to do: 



USE AN EXTERNAL KEYBOARD 

Or, use any other serial Input device In 
place of the TRS-80 keyboard. 



ELIMINATE A COMMON SOURCE OF 
PROQRAM ERRORS by running your 
keyboard In upper case only, or run In 
upper/lower case mode just like a 
typewriter. 



PRACTICALLY ELIMINATE KEYBOARD 
BOUNCE. The amount of debouncing In 
user-adjustable. 



DISPLAY UPPER AND LOWER CASE 
LETTERS on your video monitor screen. 



SIMULATE A RADIO SHACK SCREEN 
PRINTER using an ordinary printer. 



USE MOST ANY ASCII SERIAL 
PRINTER. Such as Teletype 33 or 
Splnlerm. 



TELL THE TRS-80 YOU HAVE NO 
PRINTER AT ALL. 



EXCHANGE PROGRAMS WRITTEN IN 
BASIC WITH OTHER COMPUTERS. 

From the Sorcerer to the IBM 370 (and 
TRS-80'S, too!) 



THE LIST QOES ON AND ONI 



Self-relocating for 16K, 32K or 48K systems 
$24.95 on tape $29.95 on disk 



TRS-80 SOFTWARE EXCHANGE 



6 SOUTH STREET 



MILFORD, NH 03055 
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rTnC CJOUIlt You're in Dracula's castle 
and your mission is to destroy him and thereby 
rid the world of his evil! 

^^JOIMJO V^ J &mB Remove a voodoo curse from Count 
Christo and set him tree forever! 

• Now in machine language for instant responses and 
more excitement! Plus new versions of these old 
favorites: • Land Adventure t Pirate's Cove • Mission Impossible 



RADIO SHACK COMPUTER OWNERS 
TRS-80 MODEL I AND MODEL II 



X*1>C! QA' MONTHLY 
XJVk^OU NEWSLETTER 

. nnMr^^tr^Mt A nni l/^ATI«^k.lO PROGRAMS and articles published IN OUR HRST 12 ISSUES 

• PRACTICAL APPLICATIONS include the following: 

_,,_,^,___ • A COMPLETE INCOME TAX PROGRAM (LONG AND SHORT FORM) 

• BUSINESS • INVENTORY CONTROL 

• STOCK MARKET ANALYSIS 

• AAMRL INf^ • GAMF^ * word processing program (for disk or casshtei 

*"'*"'*"■■■'** ■%i«*-»iwi^w , lower case modification for your VIDEO monitor OR PRINTER 

a Pniir^ATimj • PAYROLL (FEDERAL TAX WITHHOLDING PROGRAM) 

Ci^WWM I t\Jt'% , EXTEND 16 DIGIT ACCURACY TO TRSBO FUNCTIONS (SUCH AS 

A DEDer\MAI CIMAMr^C SQUARE ROOTS AND TRIGONOMETRIC FUNCTIONS) 

• rCnoV/IMML rinMrlOC • new disk drives for your trs so 

._^^._.-,__,^ ^%4>%nK.iP-n • PRINTER OPTIONS AVAILABLE FOR YOUR TRS BO 

• DtCalNNcR S CORNcH • a horse selection system—arithmetic teacher 

—_^^.. -_ ^_ • complete mailing list programs (BOTH FOR DISK OR CASSETTE 

• NEW PRODUCTS sequential and random accessj 

• random SAMPLING'"BAR GRAPH 

• QOPTWARP pyOHAMfvF * checkb(X)k maintenance program 

• dUI-IWAHC CAUnANUC . level 11 updates—level iiindex 

. UADIfBT Dl Ar^C • CREDIT CARD information storage FILE 

• IViMnixc I ruM^c • beginners guide to machine language and assembly 

• QUESTIONS AND ANSWERS . t^E^EwWRiNo 

>»«»,MM>«>*a MPkift.i'V:*'^! ivM • and CASSETTE tips, program hints. UTEST products 

• PROGRAM PRINTOUTS coming soon (general ledger, accounts payable and 

receivable, FORTRAN 80, FINANCIAL APPLICATIONS PACKAGE. 
AND MORE PROGRAMS FOR homeowners, MERGE TWO PROGRAMS. 

.... f-iivk^ ivf^^aiB* STATISTICAL AND MATHEMATICAL PROGRAMS (BOTH 

ELEMENTARY AND ADVANCED) , , . AND 

^f:C WORD PROCESSING PROGRAM (Cassette or Disk) 

V* J^t**^ For writing letters, text, mailing lists, etc., with each new subscriptions or renewal. 

iff LEVEL II RAM TEST ■ 

Checks random access memory to ensure that all memory locations are working properly 

(SEND FOR OUR 36 PAGE SOFTWARE CATALOG (INCLUDING USTINGS OF HUNDREDS OF TRS 80 PROGRAMS AVAILABLE I 
ON CASSETTE AND DISKETTE). « 00 OR FKEE WITH EACH SUBSCRIPTION OR SAMPLE ISSUE. | 

""SmSxcsL:: ^'24= -^ 

■«■ 1« HMH Ctti. Htm Vofk 10H« \^^^^ fc^ I IMF 

ONE YEAR SUBSCRIPTION $24 (914) 425-1535 

TWO YEAR SUBSCRIPTION $48 

SAMPLE OF LATEST ISSUE $ 4 

START MY SUBSCRIPTION WITH ISSUE 

(»1 ■ July 1978 • n? - January 1979 • #12 - June 1979) 
NEW SUBSCRIPTION RENEWAL 

CREDIT CARD NUMBER EXP- DATE _ 

SIGNATURE 

NAME 

ADDRESS 

"* ADD $6/YEAR (CANADA. MEXICO) ADD $12/YEAil AIR MAIL ■ OUTSIDE OF U.S.A., CANADA & MEXICO " 
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e. BACK ISSUES 



OCTOBER 

.Cribbage .State Capital Quiz .Death Star .Calculator .Pillbox 
.Programming Hints 

NOVEMBER 

.End Zone .Troll's Gold .Shopping List .Octal to Hexadecimal 
.Level I to Level II Conversion .Bad Code Puzzler .What They Never Told 
You About Level II 

DECEMBER 

.Spelling Bee .Santa Paravia en Fiumaccio .Biorhythms 
.Six Million Dollar Clock .Chess Clock .Mortgage Calculation 

JANUARY 

.Round the Horn .Writing Good Computer Games .Ten Pin Bowling 
.High Speed Graphics .Comput-A-Sketch .Kiddy Slot 

FEBRUARY 

Form 1040 .Concentration . Elements Quiz .Cribbage 

UPDATE .Writing Good Computer Games (Part 2) .Hints for Disk Users 

MARCH 

.Tarot .Metric/English converter .Dive Bomb 
.Personal Finance (Checkbook) .Jig Saw 

APRIL 

.Safari .Rabbits and Foxes .Personal Finance 
(Checkfinder) .Series Circuits .Don't It Make My 
Brown Eyes Blue . Spring Flowers .Excerpt: A page 
from The BASIC Handbook 

MAY 

.Dog Star Adventure .Atari . Letter Crunch . Math .Super Sub 

JUNE 

.Atlantic Balloon Crossing .German Word Quiz .Nim 
.Home Appliance Record System .Entrapment 

JULY 

.All Star Baseball .Yahtzee .Tank .Spelling Bee .Collision 

AUGUST 

.Nuclear Reactor .Storybook .Cryptogram .Shooting 
Gallery . Morse Code Tutor 

SEPTEMBER 

.Engineer .Treasure Dungeon .Hangman .Pyramids . Immediate Mode 

While still available, back issues are $2.50 IVIiltord, NH 03055. If you really can't wail any 

EACH, shipped via First Class Mail. Send longer than necessary, telephone your charge 

check, money order or Master Charge/VISA card order any weekday between 9:30 and 5:30: 

payment with order to: SoltSide, PO Box 68, tno C.T1 C-IAA 
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neoctiofiTime 



by 

Chris Freund 



Reaction time is a very short program that does what its titie impiies 
-- measure reaction time. Or, two piayers can use It as a game to see 
who has the faster reaction time. 

For the timed reaction, enter a "1" to the question that asl<s if a tim- 
ed reaction or competition is desired. After pressing ENTER to start, 
the screen wiii clear. When the word "GO!!" appears on the screen, 
press any key, and the reaction time will be given. Since the time 
must be computed by using a FOR-NEXT loop, various computers 
may give slightly different times. To calibrate, use a stopwatch to 
see how long the computer takes to complete the 1000 loop max- 
imum (when the word "GO!!" appears, start timing, and when it 
comes up on the computer, stop timing). Divide the time it took (In 
seconds) to complete the loop by 10000, and this will give the cons- 
tant needed in line 50 of the program. It should be approximately 
.005. 

The two player game is not timed. One player uses the "Z" key, and 
the other player uses the "/" key. When the word "GO!!" appears, 
both players press their respective keys as quickly as possible. The 
computer will then tell who was quickest. 

NOTE - anticipation is impossible since the time loop before the ac- 
tual timing is random. 

2 'BV CHRIS FREUND 

5 aS;INPUT"REflCTION TltlE. 

ENTER H i FOR TIMED REACTION OR. fl 2 FOR COf1PETITiON".Q 

6 IFQ=2PRINT"UNE PLflVER TAKE THE 'Z'' KEV HND THE IJTHER THE •■/■' K 
EV" 

7 INPUT "PRESS ENTER TO START"; F$ 

16 aS:PRINTCHR$(23) :FOR:>i-lTORND(50e)+560: IFINKEV$O""PRINT"V0U 

PRESSED TOO EARLY": INPUT "PRESS ENTER"; K:GOTO10 

20 NEXT 

22 IFi3=2THEN24i 

25 PR1NT"GU!!";H$=INKEV$ 

30 FORZMTO16806; IFINKEV$0""THEN56 

40 NEXT 

50 PRINT"RERCTION TIME: "jUSING"M. »#"iZ/;+. 665365. : PRINT" SECOND 

S" 

160 INPUT"PR£SS ENTER", K:GOTO10 

241 PRINT"GO!!" 

242 AJ^INt'^EVI : IFAf-" "THEN242 

243 IFflt="Z"PRINT"THE LEFT PLAYER mi" 

244 lFfll="/"PRINT"THE RIGHT PLAYER mV 
246 INPUT"PRESS ENTER"; K$;GOTOie 
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r'^-^-^^^-O/Varning to 
Disk UsersL 



You should never turn your systenn ON or OFF 
with a diskette in the drive. Even turning the 
drive itself on or off can create an electronic 
pulse at the write head and spoil a diskette. To 
protect your diskettes, remove them before 
turning any part of the system off. When you 
turn on the computer, do it in this order: 

1) Expansion Interface 

2) Printer 

3) Computer 

4) Screen 

5) Disk Drives 



Only after everything is on should you load your 
diskettes and press the RESET button in order 
to load the Disk Operating System. 

Radio Shack announced several months ago 
that diskettes were to be removed prior to shut- 
ting down the computer, but only recently have 
problems been verified when turning the system 
on. To be absolutely save, never turn any part of 
the system on or off with a diskette in the drive. 
(Note: It will not harm your disk drive to run 
empty on power up.) 
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One-Drive System: 

— $399. j40-lfack) & $675. (77-lfack) 

Two-Drive System: 
, —$795. («-lracl()& $1350. {77-lrack) 
i Tliree-Drive System: 
I — $1195. (W-trai*)* $2025. (77-lrack) 

l^uires Expansion interface, Uvel U Basic & 16K 

RAM 




Low Cost Add-On Storage for Your TRS-80''. 
In the Size You Want. 



Whether you need a single, 40-track 
TFD-100''"'^ add-on or a three-drive 
add-on with 77-tracl<TFD-200s™, you get 
more data storage for less money with 
Percom drives. 

The reason you get more for less 
from Percom drives is simple. Peripherals 
are not a sideline at Percom. Selling disk 
systems and other peripherals is their 
main business — the reason you get 
more engineering, more reliability and 
more back up support for less money. 

• Enclosures are finished in system- 
compatible "Tandy-silver" enamel. 



Choose either 40-track TFD-100TM 
drives or 77-track TFD-200TM drives. 
One-, two- and three-drive systems 
immediately available. 
Systems include Percom PATCH HaK 
#^™ on disk, at no extra charge. 
PATCH PAK #1™ de-glitches and up- 
grades TRSDOS* for 40- and 77-track 
operation. 

TFD-1 OQTm drives store 205K bytes per 
mini-disk, over 1 02K bytes on each sur- 
face. 

Low prices. A single-drive TFD-1 OOTM 
costs just $399. Price includes PATCH 
PAK #1™ disk. 



"TFO-100, TFO200. anO PATCH PAK are trademarks of PERCOM DATA COMPANY. 

•TRS-80 and TRStX)S are trademarks of Tandy Corporation and Radio Shack wtiicfi liave no reiationship to PERCOM DATA COMPANV 




6 South St., Milford, NH 03055 



(603)673-5144 



22 




STARDATE: 2200 

From Admiral Fitzpatrick- 
You are to enter and explore the Omega VI 
region of the galaxy, gather information on other 
inhabitable planetary systems you may encounter and 
defend yourself against hostiles in case of attack. You are 
in command of the Starship ENTERPRISE and her ship's complement of 
371 officers and crew. Omega VI is composed of 192 quadrants 
containing star systems and planets (a few habitable). Information on 
Omega VI is sketchy, but astronomical hazards such as pulsars. Class O 
stars and black holes are known to be present in the region 
It is also patrolled by Kiingon battle 
so look before you leap 



cruisers 

Available on Digital Cassette 

for Level II, 16K - $14.95 




TRS-80 

SOFTWARE EXCHANGE 

6 SOUTH STREET, 
MILFORD, NH 03055 



Specs: Star Trek III.3 



Play Board: 8 by 8 by 3 quadrants 

Weapons Systems: Phasers and 

Photon Torpedoes 

Power Systems: Warp and Impulse 

Computer Systems: Science and 

Ship's computer 

Sensors: Long and Short Range 

Reports: Damage Control and 

Status 

Play Elements: 20 Kiingon battle 

cruisers, 100 stars and planets, 

black holes, pulsars 
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r~Lnj LnLT" 

CHECKMATE 



T 



Sargon 



by Dan & Kathe Spracklen 

Winner of the 1978 West Coast Computer Faire, 
this revolutionary chess playing program won 5 
games out of 5 played. Sargon is written in Z-80 
language using the TDL Macro Assembler and 
occupies 8K RAtvl - 2K for data areas, 2K for 
graphics display and user interface, 4K move logic. 
Spectators were left in awe as the formidable field 
of opponents including Chess Challenger - 10, 
Chess Challenger- 3, Boris, Atari, and fy/licrochess 
1.0 was defeated. 

Level II, 16K- $19.95 

SARGON MANUAL 

114 page comprehensive manual • $14.95 



Chess Companion 



by M. Kelleher 

Plan your own chess tournament. Chess Companion 
keeps track of all strategic maneuvers, even when the 
action is fast and furious, plus serves as a chess clock 
and offers a complete listing of moves for review at any 
time. 

Level II, 16K — $7.95 
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TRI-60 lofluicifc CxchQn9e 
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THE 

MEAN 

Chcckers Machine 



l)V L.incf Mitklus 




Our resident wizard has done it again! Designed in FORTRAN, run 
as machine language, this program turns your TRS-80 into an 
unbelievably wicked checker player! Four levels of play; at the 
most difficult, the machine may take ten minutes per move, as it 
attempts to assess all possibilities. MEAN CHECKERS MACHINE 
is to checkers what SARGON is to chess. (Level 4 is an exercise in 
humility!] 

Level II, 16K $19.95 

Disk $24.95 




Get 9 

LOAD 

o( this! 



If you have less 

time at the keyboard than 

you would like to, and nave been missing 

out on someof SoftSide's feature programs, 

We've got a solution! 



35lt5ia 
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Your BASIC software magazine for TRS-80 

On Cassettes 

That's right! Now, all out monthly programs will 
be available on audio cassettes, for only about a 
dollar apiece - SATISFACTION GUARANTEED. 



The price for 6 months of cassettes plus 6 
months of SoftSide magazine is only $38.00. 
If you're already a subscriber to the 
magazine, you can enroll for the cassettes 
only, at a cost of $30.00 for 6 months. 
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So, if you want to combine the best programming 
available for the TRS-80 with the convenience of 
pre-recorded program cassettes, send your order 
to SoftSide today, and leave the coding to us! 




r 
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l" your BASIC software magazine" 

^ PO Box 68 Milford, NH 03055 

ALL RIGHT! Enroll me for 6 months of 
SoftSide on cassette. My full payment is 
enclosed as indicated below; 

DNew Subscriber - $38.00 DSubscriber - $30.00 
DCheck DMoney Order 

DCharge to Master Charge/VISA ^S 



■■^ 



Exp. date 

Signature 

NAME 

ADDRESS 

CITY, STATE. 



Interbank#. 



ZIP. 



'^ 



J 
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BciHIeship 

by John M. Delaney 

This is a single player game of war in which the computer is a for- 
midable opponent. It can be enjoyed by children of about ten up to 
adult level. 

Each side places its fleet of six warships of varying sizes on a 10 X 
10 Grid. With each turn, you enter horizontal and vertical coordinates 
and fire upon the enemy grid. If you make a hit on one of the enemy's 
ships, you try to zero in for the kill and keep hitting until it sinks. The 
screen shows hits and misses at all times for you and the enemy, but 
of course doesn't reveal the position of any enemy ship until one is 
sunk. 

The first one to send all six ships in the enemy fleet to Davy 
Jones's Locker wins the game. So, Anchors Aweigh . . . 
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18 CLS:PRINTTflB<12) "BATTLESHIP fl DELRNEV ENTERPRISE CREATION" :PR 

INT"DO YOU NEED INSTRUCTIONS (V/N) - NOTE DON'T PRESS ENTER KEY !»j 

20 »<$=INKEV$ 

20 IFXX$=""T^£N20 

40 IFXX$="V"GOSUB2000ELSEGOTO50 

50 aS:RfM)Ot1:CLERR500 

60 PRINT"THIS IS THE LAST TIME YOU USE 'ENTER' KEY ! ! ! " 

70 INPUT"WHRT IS YOUR NRTC"; NR$ 

80 DII1D*(10, 10, 2), S$<10, 10, 2), SK<6), F(2) 

90 DIM C9(10, 10) 

100 DIM H(6,2),GG$(iai0) 

110 DIMUUCie, 10) 

120 SK(1)=3:SK(2)=3:SK(3)=2:SK(4)=2:SK<5)=4:SK<6)=5:F(1)=0:F(2)=0 

130 G0SUB2% 

140 K=1:GOSUB410 

150 GOSUB870 

160 GOSUB1070 

170 GOSUK20 

1^ GOSUB1290 

190 GOTO160 

200 as 

210 F0RJ=1T011 

220 FORI=1T011 

230 PRINTI?64*(J)+4+2*<I-l), ". "j 

240 PRINT§64*(J)+36+2*<I-l), ". "; 

250 ICXTL J 

260 FORI=0TO9 

270 PRINTe4+2*L I; 

2^ PRINTe36+2*L I, 

290 PRINT(I129+64*L I; 

300 PRINTei61+64*L h 

310 NEXTI 

320 UU=LEN(NR$) :PRINT(?781-(UU/2), NR$j 

330 PRINT@811, "TRS-80"; 

340 RETURN 

350 IFD$(X, V, K)=" "THENIFK=1THENGG$(X, Y)="M" 

360 IFD$<:X, Y, K)=""THENO$(X, V, K)="M" :C$="NS" :GOTO390 

370 IFD$(X, V, K)="M"ORO$(X, Y, K)="*"THENC$="G" : RETURN 

3^ C*=DiaY,K):D$«,Y,K)="*":IFK=l GG$(X,Y)="*" 

390 PRINT§69+32*(K-1)+64*<Y+1)+2*(X), D$(X, Y, K); 

400 RETURN 
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410 GOSUB820:PRINTe832, "CRUISER COORDINATES - X,V "; 

420 GOSUB2450 

430 B$="C":N=5:GOSUB660 

440 IFE=1THEN410 

450 GOSUB820:PR1NTI?832, "BATTLESHIP COORDINATES - X,V "; 

460 GOSUB2450 

470 B$="B";N=4:GOSUB660 

480 IFE=1THEN450 

490 QOSUB820:PRINTC'822, "SUBMARINE #1 COORDINATES - X,V 

500 GOSUB2450 

510 Bf="Sl":N=2;GOSUB660 

520 IFE=1THEN490 

530 GOSUB820;PRINTe832/'SUBMARINE #2 COORDINATES - X,V 

540 GOSUB2450 

550 B$="S2":N=3:GOSUB660 

5S0 IFE=1THEN530 

570 GOSUB820;PRINTI?832, 'DESTROVER #1 COORDINATES - X,V 

5^ 6OSUB2450 

590 B$="D1":N=2:QOSUB660 

600 IFE=1THEN570 

610 GOSUB820:PRINTe822, "DESTROYER #2 COORDINATES - X,Y 

620 GOSUB2450 

630 B$="D2":N=2:GOSUB660 

640 IFE=1THEN610 

650 GOSUB820: RETURN 

660 XS=X:VS=V 

670 FORI=lTCiN 

680 I FX<0ORX>9ORV<0ORY>9THENE=1 : RETURN 

690 IFDKX. V. K)0" "THENE=1 ; RETURN 

700 IFA$="H"THENX=X+1:GOTO730 

710 IFA$="V"THENV=V+1 : QOTO730 

720 E=l: RETURN 

730 NEXT I 

740 X=XS:V=VS 

750 F0RI=1T0N 

760 D$(X,V,K)=B$:S$(X,V.K)=B* 

770 IFK=1THENPRINT(»69+64*(V+1)+2*X. LEFT$(B«. 1); 

7£® IFA$="H"THENX=X+1 
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790 IFfl*="V"THENV=Y+l 
890 NEXTI 
810 E=0: RETURN 
820 PRINT@822, " 

11 

330 PRINT0896, " 



840 RETURN 

850 X=RND(10)-1:V=RND(10)-1:T=RND<2) :R$="H" : IFT=2THENfl$="V" 

860 RETURN 

870 K=2 

880 GOSUB850 

890 B$="C":N=5:GOSUe660 

900 IFE=1THEN880 

910 GOSUB850 

920 B$="B":N=4:GO5UB660 

920 IFE=1THEN910 

940 GOSUB850 

950 B$="S1":N=3:GOSUB660 

960 IFE=1THEN940 

970 GOSUB850 

980 B$="S2":N=3 -.00506660 

990 IFE=1THEN 970 

1000 GOSUB850 

1010 B$="D1":N=2:GOSUB660 

1020 IFE=1THEN1000 

1030 GOSUB850 

1040 B$="D2":N=2:GOSUB660 

1050 IFE=1THEN1030 

1060 RETURN 

1070 K=2:GOSUB820:PRINT(>896.NFlf;" GUESS X,V VALUES; "; 

1080 X$=INKEV$;IFX$=""ORVflL<X$)<0ORVflL(X$)>9THEN1080ELSEPRINTX$i 

1090 UI=INKEY$:IFUI=""ORU$<>", "THEN1090ELSEPRINTU$i 

1100 VI=INKEV$ : IFV$=" "uRVHL<V$)<:0ORVfiL(:YI)>9THEN1100ELSEPRINTV$; 

1110 X=VflL(X$) : V=VfiL(:V$) : IFX<0ORX>9uRV<0ORV>9THEN1070 

1120 GOSUB350 

1130 IFC:$="G"THEN1070 

1140 IFC$="NS"THEN RETURN 

1150 GOSUB1320 

1160 H(LK>=H(LK)+1 
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1176 IF H(L K)>=SK(L) THEN 11% 
1188 RETURN 
1198 G0SUB12ie 

12^ RETURN 

1218 REM *SUe SINK* 

1220 FM? J=0TO9 

1228 F0RI=8T09 

1248 IFK=2THENIFS$(L J, K)=CtTHEN PRINTC-101+64*(J+l)+2+L LEFT$<C* 

.l)j 

1258 IFK=1THENIFS$(L J, K)=C$THENGGI(L J)=C$ 

1268 NEXT L J 

1270 F(K)=F(K)+1:IFF(K)06THEN RETURN 

1280 GOSUB820 

1290 I FK=2THENGOSUB2210 : GOTO1310 

1200 GOSUB2290:GUSUB2250 

1210 END 

1220 IFC$="S1"THENL=1 

1220 IFC$="S2"THENL=2 

1240 IF C$="D1"THEN L=2 

1250 IF C$="D2"THEN L=4 

1260 IF CI="B"THEN L=5 

1270 IF C$="C"THEN L=6 

1280 RETURN 

1298 K=1:GOSUB820 

1400 GOTO1510 

1410 ;<;=RND(10)-1 : V=RNC";i0)-l 

1420 IFV>0THENIFGG$(X. V,-1)=""THEN1470 

1420 IFX<9THENIFGG$(X+1, V)=""THEN1470 

1440 IFY<9THENIFGG*(X.V+1)=""THEN1470 

1450 IFX>0THENIFGG$(X-1. V)=""THEN1470 

1468 GOTO1410 
1470 GCISUB250 

1480 IFC$="G"THEN 1418 

1490 IFl;$="NS"THENRETURN 

1500 GOTO1150 

1510 FURX1=0TO9 

1520 GOSUB820;PRINTC«i896. "TRS-S6 IS GUESSING !% 

1520 FORV1=0TO9 

1540 IFGG$(X1. V1)="*"THENC9(X1, V1>=C9(X1. Vl>+1 : IFC9<X1. V1)>15THE 
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N15b8 

1550 IFGG*(X1, V1)="*"THEN GOTO1580 

1568 NEXTVl. XI 

1570 GOTO 1416 

1580 X2=X1:V2=V1 

1590 IFUU<X1. V1)=0THEN1640 

1600 IFUU(XL V1)=1THEN1720 

1610 IFUU(X1,Y1)=2THEN1820 

1620 IFULKXl; V1)=3THEN1910 

16i0 IFUU<X1; V1)=4THEN1560 

1640 V2=V2-1:IFV2<0THEN1720 

1650 IFGG*(X2, V2)="*"THEN1640 

1660 IFGG$(X2,V2)O""THEN1720 

1670 X=X2;V=V2 

1630 GOSUB350 

1690 IFC$="G"THEN1720 

1700 IFC$="NS"THENRETURN 

1710 GOTO1150 

1720 UU(X1,V1)=1:GOTO1580 

1720 X2=X2+1:IFX2>9THEN1810 

1740 I FGG$ (X2, V2) = " * " THEN1720 

1750 IFGGf(X2,V2)<>""THEN1810 

1760 X=X2:V=Y2 

1770 GOSUB350 

1780 IFC$="G"THEN1810 

1790 IFC$="NS"THENRETURN 

1800 GOTO1150 

1810 UU(XLV1>=2:G0T015S6 

1820 V2=V2+1:IFV2>9THEH1500 

1820 IFGG*(X2, V2)="*"THEN1820 

1840 IFGG$(X2.. Y2)O""THEN1900 

1850 X=X2:V=V2 

I860 GOSUBK50 

1870 IFC$="G"THEN1900 
1880 IFC$="NS"THENRETURN 

1890 GOTO1150 

1900 UU(X1,V1)=5:GOTO1580 

1910 X2=X,2-1:IFX2<0THEN1990 
1920 IFGG$(X2,V2)="*"THEN1910 
1920 IFGG$<X2,V2)O""THEN1990 
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1940 X=X2:V=V2 
1950 GOSUB350 
i960 IFC$="G"THEN1990 
1970 IF«="NS"THEf«ETURN 
1980 GOTO1150 
1990 UU(XLV1)=4:GOTO1580 

2000 CLS; PRINT: PRINT: PRINT" THIS IS THE GFIME OF BATTLESHIP IN \A 
HICH VOL! HILL PLfiV flGfllNST" 

2010 PRINT"THE TRS-8e IN ft GAME OF WAR. THE FIRST ONE TO SINK ft 
LL HIS " 

2020 PR I NT "OPPONENTS SHIPS WINS' THERE ARE 6 SHIPS - THE CRUISE 
R (CCCCC)" 

2020 PRINT"THE BATTLESHIP (BBBB) - SUBMARINE #1 (SSS) - SUBMARIN 
E #2 (SSS)" 

2040 PRINT"DESTROVER #1 (DD) AND DESTROVER #2 (DD). THE PLflVING 
BOARD" 
2050 PRINT"C;ONSISTS OF TWO lO X 10 GRIDS, YOURS AND THE TRS-80'S 
. VOU" 

2060 PRINT"ENTER X (HORIZONTAL) AND V (VERTICAL) COORDINATES - ( 
X.V). " 

2070 PRINT"TO CONTINUE PRESS 'ENTER' "; :INPUTXV 
2080 NA$="PLAVER":GOSUB 200 

2090 PRINT :PRINT"THIS IS WHAT THE GRIDS LOOK LIKE!" 
2100 PRINT"TO CONTINUE PRESS 'ENTER' "i :INPUTXV 
2110 CLS: PRINT :PRINT"THE FIRST THING VOU ARE TO DO IS POSITION V 
OUR 6 SHIPS ON VOUR" 

2120 PRINT"HRRHV. VOU DO THIS BV PICKING THE TOP OR LEFTMOST PO 
INT> WHERE" 

2130 PRINT"VOU WISH TO ENTER THE SHIP, AND THEN ENTER WHETHER VO 
U WISH IT" 

2140 PRINT"ENTERED VERTICALLY (V) OR HORIZONTALLY (H> FORM THAT 
POINT. " 

2150 PRINT"TO CONTINUE PRESS -'ENTER' "i ;INPUTXY 
2160 CLS : GOSUB200 : B$= " C " : H*= " H " : X=0 : V=0 : N A$= " PLAYER " 

2170 F0RI=lTCi5:PRINTK.9+b4*(Y+l)+2*X,LEFT$(B$, I)i 

2130 IFA$="H"THENX=K+1 

2190 NEXT I 

2200 PRINT@832, "AN EXAMPLE FOR CRUISER AT (0, 0) H ! "; 

2210 PRINTC1896, "TO CONTINUE PRESS 'ENTER' ".; :INPUTXY 



34 



2228 CLS:PRINT"flFTER VOU ENTER ALL VOIK SHIPS VOU BOTH EXCHANGE 
FIRB ONE" 

2230 PRINT'-flFTER THE OTHER. BV ENTERING A (X,V) COORDINATE WHERE 
Vm THINK" 

2240 PRINT"THE TRS-Se'S SHIP MIGHT BE. IF VOU MISS, NO SHIP IS 
T«RE AND" 

2250 PRINT"A 'M' WILL APPEAR. IF VOU HIT fl SHIP A '*' WILL APPE 
RR. WHEN" 

2260 PRINT"VOU SINK ONE OF THE TRS-88'S SHIPS IT WILL APPEAR ON 
THE SCREEN" 

2270 PRINT"AS LETTERS, I. E. <SSS). FIRST ONE TO SINK ALL THE EN 
EtIVS SHIPS" 

2280 PRINT" IS THE WINNER!!" 
2290 PRINT"TO CONTINUE PRESS 'ENTER' ".; : INPUTXV 
2200 RETURN 
2210 FORX?=iTO1000 
2220 PRINTNA$; " VOU WON ! "; 
2220 NEXTX7 
2240 RETURN 

2250 CLS:FORX7=1TO1008 
2260 PRINT" TRS-80 WINS ! "; 
2270 NEXTX7 
2280 RETURN 

2290 PRINTe822, "fflME IS OVER"; 
2400 FORJ=0TO9 
2410 FORI=0TO9 

2420 PRINTei01+64*(J+l)+2*L LEFT$(S$(L J, 2), 1); 
2420 NEXTL J 

2440 PRINTe896, "WHEN VOU HAVE SEEN ENOUGH PRESS 'ENTER' "; : IfWT 
XV: RETURN 

2450 REM* JOHNS SUB* 

2460 X$=INKEV*: IFX$=""ORVAL<X$)<0ORVflL(X$)>9THEN2460ELSEPRINTX$i 

2470 U$=INKEV*:IFU$=""0RU$O", "THEN2470ELSEPRINTU$i 

2480 V$=INKEV$: IFV$=""ORVAL(V$)<0ORVAL(V$)>9THEN2480ELSEPRINTV$; 

2490 X=VAL<X$) : V=VAL(V$) : IFX<0ORX>9ORV<0ORV>9THEN2450 

2500 PRINT0896, "H OR V"; 

2510 fl$=INKEV$ 

2520 IFA$=""THEN25i0 

2520 IFH$="H"THENRETURN 

2540 IFft$="V"THENRETURN 

2550 GOTO2500 
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Westward-1847 





by Jon C. Sherman 

Wiltiam E, Taylor sat despondent on what remained of his new $200 wagon 
on a cold September morning in 1846. The spari^ from iast night's cook fire that 
ignited the canvas top of the wagon might Just be the iast catastrophe needed 
to end the dreams of Bill and his famiiy. How could it have happened so close 
to the end of the trail? Nineteen weeks ago in Indepen- 
dence, Missouri, Bill, his wife Martha, and children, Sara and Jamie, had head- 
ed westward toward a new life in Oregon. They paid $300.00 for the best team 
in town, $100.00 for warm clothing, $50.00 for ammunition for the rifle and 
Bill's Colt .45, $100.00 for flour, salt and beans, and another $100.00 for 
medicine, wagon parts and other goods. It left them with only $50.00 from the 
sale of their worn-out Kentucky farm. Bill wanted to buy more bullets or a cou- 
ple sacks of flour, but Martha said no. They would make do with what they 
had. 

"A real blessing, that woman," Bill thought, as he climbed down to inspect 
the damage for the tenth time. Without that $50.00 they would have all died. A 
band of riders, who looked so friendly, turned out to be hostile. The Doc at the 
fort charged $20.00 to patch up Bill's wounded leg. Another $20.00 went to 
replace the clothes they had lost when the wagon was swamped in some 
nameless river. The last $10.00 bought medicine when Sara caught pneumonia 
in the blizzard. 

Bill pulled hard at the left rear wheel. It groaned. It had been groaning ever 
smce it broke the first week into the mountains, and he was forced to spend a 
full day replacing the two ruined spokes. "It'll hold," Bill said, "now that the 
fire has lightened the toad." 

It was the mountain that had hurt the Taylors the most. The rugged trail and 
the snow in the passes stopped them for days; the bad water made the 
animals sick; the small and infrequent game meant they were hungry most of 
the time. 

Bill finished his inspection as the sun struggled over the eastern mountains. 
He knelt and kissed Martha lightly on the cheek and pulled 
Jamie's blanket up against the morning cold. Then he picked up his rifle and 
the last box of bullets and headed into the forest. 
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By noon, Martha had sorted through the supplies, keeping what could be 
used and throwing out what was ruined. In the wagon sat three pounds of 
beans, five pounds of flour, a little salt and some coffee. "Not enough," she 
said to herself. 

A rifle shot! And then another!! Far off, they echoed between the mountain 
walls. A minute passed . . . two minutes . . . and there was only silence. Five 
minutes. Had he missed? In'ten minutes Ivlartha's hope began to fade. Surely, 
he would have found the game animal by now and ended its pain with a final 
shot. Twenty minutes passed. Sara sat rocking her old doll and humming a 
hymn. Jamie just stared into the forest. He had missed. Martha was sure of it. 
She fought the tears and the hunger and set about watering the team. If worst 
came to worst they could.... 

Another shot! ! It came from just inside the forest. Bill's yell, triumphant and 
relieved, started them all cheering. He had hit it! It must be a big animal to have 
run so long and so far before falling. They would eat well tonight. They would 
make it to their new home in Oregon. 

William E. Taylor and his family and hundreds of others did make it to 
Oregon in 1846. Thousands came in the three decades from 1840 to 1870. 
Could you have made it? WESTWARD - 1847 is your chance to try. 

You will first be asked how good a shot you are. 

(1) ace marksman 

(2) good shot 

(3) fairtomlddin' 

(4) need more practice 

(5) shaky knees 

The better you claim to be, the faster you will have to be with your rifle. 
However, you wil have a better chance to hit your target as an 'ace marksman' 
than as a 'shaky knees'. 

You have just spent $200.00 for a new wagon and have $700.00 left to buy a 
team of oxen, food, and supplies. You can spend $200.00 to $300.00 on your 
team. The more you spend, the better your animals will be and the faster you 
will go. The more food you have the less chance there is of getting sick. You 
will need bullets to drive away bandits and hostile riders, to fight off wolves, 
and to hunt for more food along the trail. One dollar buys a box of 50 bullets. 
You must have enough warm clothing for the cold weather and snow you will 
encounter in the mountains. Miscellaneous supplies include medicine, wagon 
and harness parts and other things you will need for sickness and emergency 
repairs. 

You can spend all of your money In Independence, or you can save part of it 
to spend along the way. However, things cost more at the forts (forts appear 
every other turn). You can also hunt along the trail to replenish your food- 
supply. 

At the beginning of each turn, you will be told your current supply situation. 
All the amounts will be given In dollar values except bullets. You will be asked 
if you want to stop at a fort, hunt, or continue. Stopping at a fort costs time, 
but gives you the opportunity to buy food and supplies. Hunting costs time 
and bullets, but will add to your food supply if you are successful. Continuing 
is the fastest way to get to Oregon, provided you have enough supplies. 
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You will next be asked how well you want to eat. Eating well takes lots of 
food. Eating poorly risks illness. 

From now until ttie beginning of ttie next turn your fate is in the hands of the 
computer, but don't just sit there! There may be bandits or wolves you will 
have to frighten off with your gun, or one of your oxen may wander off. Oops! 
Was that your daughter who just fell and broke her arm? Ouch! 

When you must use your gun along the trail, you will be told to type a four 
letter word which sounds like a gunshot. The faster you type the word and hit 
the space-bar, the better chance you will have of hitting the target. Don't 
forget to hit the space-bar. 

Strategies: 

It might be interesting to play the game a few times before reading this sec- 
tion. After all, most of the folk who started out from Independence in 
1840-1870 did make it to Oregon or California with no more experience or infor- 
mation that you have now. However, if your aim is to complete your journey 
quickly and as safely as possible, I can offer some advice. 

Your survival rests heavily on your ability to keep food on the table. I sug- 
gest you hunt on turns that do not have forts. If you miss, stop at the fort on 
the next turn and buy enough food to last you to the next fort. That way you 
will have enough, even if you should have bad luck on your next hunt. 

The most devastating occurrence is an attack by hostile riders. 
Luckily for you, the riders, like the rain in Spain, stay mainly on the 
plain. It is advisable to get across the first 950 miles as fast as possi- 
ble. Hunting and stopping at forts will only slow you down. Inciden- 
tally, the program's evaluation of the possible hostility of the riders 
is wrong 20 percent of the time. 

Eating poorly invites sickness, and sickness invites disaster. 
However, if you have gone more than 1850 miles you can probably 
get away with it. Anything over 2040 miles will get you safely to 
Oregon. 

Program improvements: 

WESTWARD-1847 is written for people with average typing ability. 
If you are an expert typist, or, as you become more proficient at typ- 
ing four lettter words, you should consider making these changes, 

LINE NUMBER CHANGE FROM CHANGE TO 

800 TT/4 TT/3 or TT/2 

800 <:S ^S + 2 

810 TT<45 TT<35 

950 M+200 M-H75or 

M + 150 

You can change the words to be typed when using your gun by 
changing the string variable S$ in the shooting sub-routine line 2170. 
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10 CLE«i!95e 
20 DEFIWT fl,X.E,l1 
30 CC$=STRING*(60; 22) 
40 DIMD$(20) 

50 CLS;PRINTCHR$(22):PRINT(?400," 
WESTWFlRD 
1847":GOSUE50e0 
55 ■' 

** SET UP GfitlE *+ 
60 CLS: PRINT: PRINT" 

HOW GOOD fl SHOT ARE VOU WITH VOUR RIFLE?" 
70 PRINT: PRINT" (1) MflRKStlflN 

(2) GOOD SHOT 
(2) FAIR 

(4) NEED PRACTICE 

(5) SHAKV KNEES" 
80 PRINT" 

ENTER ONE OF THE ABOVE"; 
90 Iff UTS 

100 S=INT(S) : IFS>5THENS=5 ELSE IFSaTHENS=l 
110 F=l 
120 CLS 
125 ' 

** BUV SUPPLVS ** 
130 PRINT "HOW MUCH DO VOU WANT TO SPEND ON - 

VOUR OXEN TEAM (1280 - $300) 

FOOD 

AmUNITIOH 

CLOTHING 

MISCELLANEOUS SUPPLIES" 
140 PRINTC468, " "i:INPUTA(l) 

150 IFfiKl)<200PRINT@i68, "NOT ENOUGH"ELSElFfl<l)>i00PRINTei68, "TOO 
r«H"ELSEGOTOi?0 
166 FORT=1TO250 : NEXTT : PRINTL'168< " ". : QOTO140 
170 GOSUB330 

180 PRINTe296/' ", :INPUTA(2) 
190 IFA(2)<:0THENX=2y6:GOSUB340:GOTOi36 
20£! GOSUe330 
210 PRINTe424/' ";:INPUTAG) 
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220 IFB<6T^elX=424:GOSUB340:QOTCl^l0 
220 Q0SUB2i9 

240 PRINTe552/' "i:WUTfl(4) 
250 IFfl(4)<0THENX=552;GOSUB240:GOTO 240 
260 GOSUB3i0 

278 PRINT?630," "i:INPUTft(5) 
280 IFfi(5)<0TH£NX=680;GOSl^3i0;GOTO270 
290 Q0SUB226 

300 R(6)=700-fi(l;-fl(2)-FlCi)-R(4)-fl(5) 
310 IFft(6)>06OTO340 

320 PRINTS. "VOU OVERSPENT - VOU ONLV HAD $700 TO SPEND. TRV AG 
flIN";GOSUB2290;GOTOil6 

330 PRINT(?832/'V0U HAVE "j700-fl(l)-fl(2)-fl(3)-H(4)-fi(5); " DOLLARS 
LEFT, "j: RETURN 
340 A(3)=50*A(3) 

3J.0 PRINTC-989, "ARE ALL OF THE AMOUNTS OK". :INPUTCI:IFLEFT$(C*,1) 
="N"F0RK=1T06 ; fl';X)=0 : NEXT ; GOTOlib 
255 ■■ 

*+ START EACH TURN ++ 
260 RANDOM ;IFA(5)<0GOTO1980 
270 1FA(2)<0GOTO1960 
375 ' 

+•* SET DATE ♦* 

280 RESTORE 

390 CLS:T=T+i 

400 IFT>2i3GOTO440 

410 F0RX=1T0T:REHDD*;NEXTX 

420 DATA fW;CH 29 , APRIL 12 , APRIL 26 ,riHV 10 ,nm 24 ..JUNE 7 .J 

Ut€ 21 > JULV 5 ..JULV 19 .AUGUST 2 .AUGUST 16 .AUGUST 31 .SEPTEfl 

EiER 12 .SEPTEMBER 27 . OCTOBER 11 .OCTOBER 25 .NOVEMBER 8 .MOVEM 

BER 22 .DECEMBER 6 .DECEMBER 20 

430 PRINTC10. "MONDAV, ";D$j". 1847 ". .GOTO460 

440 PRINTC-O. "Vai HAVE BEEN ON THE TRAIL TOO LONG 

VOUR FAMILY DIES IN THE FIRST BLIZZARD OF WINTER. " 

450 GOTO2kr20 

460 F0RX=1T06: IFA(X)<0THENA(X>=0 

470 NEXTX 

480 IFA<2)<12PRINTi?704. "YOU'D BETTER DO SOME HUNTING OR BUY F(X)D 
1 1 1 »j 

490 GOSUB2200 
495 ' 
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** PRINT SCREEN ♦* 
5ee PRINTS, STRING$(2e, 32); ;PRINTei0/'TOTftL MILEAGE IS Mli 
518 PRINTe64, " FCCD BULLETS CLOTHING tllSC. SUPP. CftSH" 

528 PRINTei28/' "ifl(2):PRINTei29ifl(3)i ;PRINTei49,fl(4)j ;PRINT§161 

,H(5)i:PRINTei71>fl(6). 

528 IF fl>2846 G0SUB2298 ; GOTU2160 

548 IF F=lPRINTe?68,CC$; :PRINT@768, "DO VOU WANT TO (i) HM, OR 

(2) CONTINUE"; :GOTO560 

556 PRINTe768. CC$i :PRINT(»5i2,F$, :PRINT@768, "DO VOU WANT TO (i) H 

UNT, (2) roNTINI£, 

OR (3) STOP AT THE FORT"; 

555 •■ 

♦+ GET CHOICE OF ACTION ** 

560 i\miy. 

576 IF Xa OR X>2 THEN X=2 

580 IF X-1 AND H(3)<46 PRINT@832aCIj :PRINTe822, "VOU DON'T HAVE 

ENOUGH AMMUNITION TO HUNT. "; : GOSUB2290 : GOTa540 

590 F=F+(-l) 

660 C»;GuT0766, 888 

605 ■' 

*+ STOPPING AT FORT ** 
618 PRINTC«704,CC$; ;PRINT@764; "ENTER WHAT VOU WISH TQ SPEND ON TH 
E FOLLOWING". 

620 PRIHT§76S.. C«, " ". ;PRINT§?68/' FOOD BULLETS CLOTH 
im MISC. SUPP. ". 
630 PRINTe332> CC$, :P1=835;G0SUB726 
540 flC2)=H(2)+D*2/2 
650 QOSUB720 
660 HG)=A(3)+D*33 
676 GOSUB720 
680 A<4)=A(4)+D*2/3 
696 QOSUB720 
700 A';j)=AC5;'+D*2/3 
710 M=I1-25;GOTO880 
720 PRINTCipL " ". . INF'UTD 
730 IF D<8 THEN D=0: RETURN 
.740 IF A';6)-D<0 PRINTe960.CC*, ;PRINTe960/'VuU DOt-i'T HAVE THAT MU 



42 



CH - KEEP VOUR SPENDING DOWN"; :GOSUB2290;PRINTe96e.CC$i iPRINTCPi 

";:PRINT(?PL" "j :G0T0726 
756 ft(6)=fl(6)-D:Pl=Pl+ll:RETURN 
755 ' 

** HUNTING ** 
766 60SUB2358:IF fl(i)>4e GOTO 786 

770 PRINT(?764, "5C«RV - VOU NEED MORE BULLETS TO GO HINTING". GO 
T0566 
780 t1=(1-15 
796 Q0SUE;214e 

806 IF X>3 OR RND(i6e)aT/4 OR RW(16)G GOTO 876 
816 IFTT<45THEN840 

826 fi(2)=fi(2)+50-TT/75;H(3)=fl(3)-10-TT/5 
830 PRINTi?768, "BULLS-EVE ~ 
GO® EflTIN' TONIGHT ! !"; :Gt)SUB2290;GOTO880 
846 PRINTC-768, "RIGHT BETWEEN THE EVES — VOU GOT H BIG ONE 
FULL BELLIES TONI(M!l"i 

850 fl(2)=fl(2)+52+RND(i0) .fl(3)=ft(3)-10-RND(8) ;GOSUB2290:6OTO380 
860 GOTO 880 

878 PRINTe768. "VOU MISSED— ftND VOUR DINNER GOT flWflV "; ;GOSU 

62290 

880 IF fl(2)a5 GOSUB2290;GOTO1960 

890 GOSUB2350 

895 ' 

*+ EfiTING? *♦ 
900 PRINT§768. "DO VOU WANT TO EflT (1> POORLV (2) tlODERflTELV (3 
) HELL"i;INPUTE 
910 IFE>3ORE<1QOTO890 
920 X=fl(2)-5*(E+1)-RND(10) 

930 IF X<0PRINTe896/'*** VOU CFlN'T EftT THftT i€LL ***", :G0T08 
90 

940 R<2)=X 

350 M=t1+200-(220-fi(l) )/3+RND(10) 
955 ' 

** RIDERS ** 
960 IF fl>950 GOTO 1260 

970 IF RND(100»10*<5. 2-<RBS!;460-ri).''9e)+SQR(((466-R)/'900)+'; 466-11 
)/96)) GOTO 1260 
980 FC».TT=lTO1660;NEXT;aS:PRINTe478.l.i$; ;PRINT(»256.SR*. ;PRINTK7 
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8>SR$i ;PRlNT§592,SR$i .PRINTI?578>LR$i ;PRINTe527>LR$j 

990 PRINTee. "RIDERS flPPROflCHING. THEY "; ; IF PJJDCiBX 

'T °; :F1-1 

18M PRINT'lOOK HOSTILE". 

1010 PRINT@724, "TACTICS". 

1020 PRINTe768/'(l) RUN (2) HTTflCK Cs) CONTINLE (4) CIRCLE Wfl 

GONS"i 

1030 PRINTC-Sa "IF WU RUN VOU'LL GAIN DISTANCE BLIT TIRE YOU UXE 

N. 

IF YOU CIRCLE YOU'LL LOSE TIME BUT BE RELATIVELY SAFE. "; 

1040 INPUTX1:GOSUB2350 

1050 IF XKl OR Xl>4 THEN 1020 

10613 IF RND';5)-1 THEN Fl-l+Fl 

1076 ON Xl-1 GOTO 1110.1190,1210 

10^ t1=M+20;A(l)=A(l)-20 

1690 IF Fl=l GOTO 1196 

1100 H<i)=A'3>-100.PRINTL-76S,"WHflT H FIGHT - 

BUT YOU ESCAPED. "; :GOSUB2290;GOTO1268 

1110 PRINTC*0. CC$. :GOSUB2170 

1120 fl<2>=A(2)-120-TT/3; 

1120 G0SUB2356 

1140 IF X>2 GOTO 1170 

1150 IF TT<CS*28 THEN 1186 

1166 PRINTe76a "NICE SHOOTING — YOU DRWE THEM OFF"; ;G0SUB2296 

;QOTO1260 

1170 PRINTC'768, "LOUSY SHOT — YOU GOT KNIFED 

YOU HAVE TO SEE OL' DOC BLflNCHARD". ;QOSUB2290:A<6)=A(6)-26:IF A'i 

6X6 THEN Fi=l;GOTO1970 ELSE GOTO1260 

1180 PRINT@768/'Y0U NEED PRACTICE WITH YOUR COLT . 45"i :GOSUB2290 

1190 IF Fl=lPRINTe832/'RIDERS WHERE FRIENDLY"; :Q0SUB2296:GUT0126 



1200 Fi(i)^H(3)-150:f'!=Pt-15;fl(l)=A(l)-16:fl(2)=fi(2)-25:A(4)=INT(fl(4 

)/l. 5) 

1210 PRINTe8S2. "RIDERS WERE HOSTILE".. ;IF A(3)<0 GOSUB2290 ; G0T012 

20 ELSE PRINT" — CHECK FOR LOSSES", ;GUSUB2290:GOTO1260 

1220 CLS:PRINT"YOU RAN OUT OF AmUNITION AND THE RIDERS KILLED Y 

OU flfC' 

VillR FAHILY" ;GOSUB2290;GOTO2020 

123:0 ri=H-26 
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1246 IF Fl=lPRINTe?68. "THEV DIDN'T flTTflCK"> :ELSEPRINTC'768, "YOU D 
ROVE THEM OFF"; ;fi(2)=fl(2)-iee 
1258 G0SUB2256 
1255 ' 

*♦ \KfSabS *♦ 
1266 CLS;GOSIJB2360;IFM<956PRINT(»i87,T$i :PRINTe3:];5.T$, 
1276 RANDOM 
1280 R1=RND(85) 

1296 IF R1<7PRINTC'6SS. " ". ;PRINTL'768. "BROKEN MfiGON WHEEL - 
VOU MUST STOP m> USE SUPPLIES TO FIX IT. ". ;GiJSUB2256:fl=n-5-RND( 
5):ft(5)-fl(5)-8;G0T01616 
1300 IF RiCLt PRINTf758. "OX INJURES fl LEG — 
HE i4iLL SLOW YOJ DOWN THE REST OF THE TRIP. \ .GOSUB2290.H<l)=fl';i 
)-15-RND(i6);G0T01616 
1210 IF Rl<14PRINTe76S. "VOUR ", : IF RND(2)^1 PRINT"S0N BROKE HIS 

", ELSE PRINT"DflUGHTER BROKE HER ", :ELSE GOTO 1216 
1226 PRINT"F1PJ1 ~ 

TOU mi TO STOP AND tlHKE H SLING. ". :GOSUB2290:11=M-5-RNDC5):ft(5) 
=R<5)-5:G0T01bl6 

1220 IF Rl<ibF'RINTg7b8; "AN OX WANDERS OFF ~ 
VOU MUST SPEND HALF R DAV LOOKING FOR IT. "; ;GOSUB229e:M=l1-20;6OT 
01618 
1246 IF Ria3PRINTe768/'V0UR ", ;X=RND';5;':IF XaPRINT"SON ", :ELSE 

IF X<4PRINT"D0G "; :ELSE PRINT"DhUGHTER ". 
1250 IFRK18 PRINT"WANC€RS AWAV FROM THE WAGON ~ 
VOU MUST SPEND TIME LOOtJNG FOR ", :IF X<4PRINT"HIfl "; ;ELSEPRINT" 
HER. "i 

1260 IF RKIS GOSUB22y0:t1=M-16-RND(16):GOTOi616 
1276 IF Rl<:22 PRINT@768, "BAD WATER -- 

VOU MUST SPEND TIME LOOKING FOR A CLEAN SPRING. "; ; GOSUB2230 ; M=M- 
i8-RfCi(16):GQT01616 

1286 IF RK26 PRiNTe76& "BANDITS ATTACK". .PRINTeaCC*.CC$i :£LSE 
GOTO 1460 

1230 PRINTe58L LR$, :PRlNTCi526AR$i :PRIHT@595,LR$; :GOSUe2170 
1400 A(2)=^A(2)-TT;IF A(2)<0PRINTe763/'VOU RAN OUT OF BULLETS - 
THEV GOT MOST OF VOUR MONEV. "> :G0SUB2296;A(6)-INT(A(6),'l. 5);1F R 
ND(4)=1F'RINT" AND ". ;GOTO1420 
1416 IF X<2GOTO1450 
1420 PRINTy896, "THEV SHOT VOU IN THE ". ; IF RND(2)=lPRINT"RRf1 "; : 
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Your Market 

Fer Nflw And Used 

Microcprnputer 

Equipment 



NEW! TRS-80 Computers 10% off! 

Effective July 1, Radio Shacl^ dropped the price of TRS-80 
equipment. On the same date, we received authorization to 
sell the complete TRS-80 line, at 10% below the new low 
Radio Shack price. This all new equipment, with Radio Shack 
warranty and service, is now made more affordable than ever! 

If you're looking to save even more, consider HardSlde's used 
equipment department for prime condition, previously owned 
TRS-80 equipment. 

Do you have something to sell? Hardside will buy any used 
Radio Shack TRS-80 equipment In good condition. Refer to 
our price list below. 

So ... if you're looking to buy or sell TRS-80 equipment, look 
to us first! 

As an introduction to Hardside™ we are offerinq two special 
packages: 

1) TRS-80 expansion interface with our 16K RAM, single 
PERCOM disk drives with cable, and NEWDOS disk 
operating system. $830. Save $167. 

2) TRS-80 Level II, with our 48K RAM, dual PERCOM disk 
drives with cable, Centronics 779 tractor printer with cable, 
and NEWDOS + disk operating system. $2999. Save $1144. 

These two offers are good for 60 days only, and expire November 30, 1979. 

We will soon be opening a retail location for our New England 
customers. Watch for details. 

6 South Street IMilford, New Hampshire 03055 

(603) 673-5144 
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NEW 


USED 


UNIT 


RETAIL 


HARDSIDE 








LIST PRICE 


DISCOUNT PRICE 


WE'LL PAY 


SELL 


Level 1 4K 


$499 


$449 


$275 


$375 


Level II 4K 


$619 


$557 


$370 


$475 


Level 1 16K 


$729 


$656 


$365 


$475 


Level II 16K 


$849 


$764 


$500 


$650 


Level II 16K, No Keypad - 




$669 


$450 


$600 


EXPANSION INTERFACE 










.... OK 


$299 


$269 


$175 


$240 


.. .16K 


$448 


$369/$403 


$225 


$315 


. . . . 32K 


$597 


$469/$537 


$275 


$390 


DISK DRIVES 










Radio Shack #0 


$499 


$469 


$275 


$399 


Radio Shack #1 


$499 


$469 


$250 


$375 


Percom TFD-100 




$399 






Percom TFD-200 dual dens 


iity 197K 


$675 






PRINTERS 










* Centronics 779 


$1559 


$1000 


$650 


$850 


Tractor Feed 










* Centronics P1 


$499 


$399 


$250 


$325 


Quick Printer II 


$219 


$197 


$125 


$175 


Line Printer II 


$999 


$899 






Line Printer III 


$1999 


$1799 






* Requires Cable 


$39 


$35 


$20 


$30 


R/S 26-1401 










TRS-80 HARDWARE ACCESSORIES 








Telephone Interface II 


$199 


$179 


$100 


$150 


16K Memory Kits 


$149 


$99 






RS232C Serial interface 


$99 


$89 


$50 


$75 


TRS-232 Interface 




$49 






Data Dubber 




$49 






Line Cord Suppressor/Filter 


$32 







Prices do not include shipping 
COD orders require 
25% cash deposit 



Your M*rtc«t For Naw And 
Used Microcomputer 
Equipment 




S South Street Mllford, NH 03055 
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ELSEPRINT'lEG "; 

1438 PRINT "HND TOOK ONE OF VOUR OXEN 

KTTER HhVE T^E DOC LOOK AT VOUR WOUND I", : F3=l ; GOSUB2290 

1448 R(5)-fl';5)-5;fl(l)=R(l)-20;fl(6>=H(6)-26.IF R(6)<0 GOTO i%6;E 

LSE GOTul6i0 

1456 ?Rim?SZ, "FASTEST DRfiW IN THE WEST I ! 

VOU CHHSED 'EM flWftVI"; ; 005082236 : GOTO1610 

1460 IF Ri<2S PRINTC-768> "THERE IS fl FIRE IN VOUR ItflGON -", iFORV 

=2iT04STEP-l ; FORX==lTOV-i : Z=129-V-RND(V+2) : SET(Z, V) : NEXTX. V ; ELSE 

GOTO1480 

1470 PRINTC'832, "FOOD, CLOTHING AND SUPPLIES ARE DAMAGES. "; :A(2)= 

A(2)-PJ^lD(30);A'3)=R(3)-PJ*(586):A(4)=A(4)-RND(i0);H(5)=A(5)-RND( 

10) ; ri=t1-25 ; GOSUB2290 : GOTO16i0 

1480 IF PIGS PRINTC-Zea "VOU GET LOST IN HEAVV FOG. "; ;GC6Ue2290; 

n=t1-16-RND<5):GOTO1610 

1490 IF Pl<35PRINTe7b8/'V0U KILL A POISONOUS SNAKE ", ;A(3)=A(3)- 

10. IF RND(4)<4PRINT"AFTER IT BITES VOU!". ;A(5)=A(5)-5: ELSE; ELSE 

GOTO 1516 

1500 IF fif;5)<0PRINTe896. "VOU HAVE RUN OUT OF MEDICINE - 

SO VOU DIE OF SNAKEBITE!", ;GOSUB2290;GOTO2020;ELSE GOSUB2290:GOT 

01616 

1516 IF RK45 PRINTC-768. "VOUR WAGON GETS SWAMPED FORDING fl RIVER 

VOU LOSE FOOD AND CLOTHING. "; ;ELSE GOTO 1536 

1520 F0RX=eT062STEP3;PRINT@64e+X,WT$(l), :PRINTe576+X,WT$(2), :HEX 

T ; GOSUB2290 : R(2)=A(2)-Rt*(30) : A(4)=A(4)-RND(26) . M41-15-RfC'<i0) : G 

OTOi610 

1530 IF Rl<55PRiNT@768/'WILD H(iiIMRLS RTTflCI';!!". :FOR X=5T015STEP5 

;PRINTe644+X,ltfl$J iPRINTeSSl+z'I.UAIj ;NEXT:PRINTe643,WA$i ;PRINT§6,C 

CI.CCI; ;G0SUB2176;ELSE GOTO 15S'0 

1540 R<3)=A(3)-TT/2 

1550 IF R(3><0PRINTe768, "VOU ARE TOO LOW m BULLETS ~ 

THE WOLVES OVERPOWER VOU!"j ;A(2)=A(2)-Rt€i(26);A(5)=A(5)-10;IFA(5 

)<6 T(£N F3=l;GOTO1980:ELSEGOTCil610 

1566 IF X>3F'RINTe896, "THEV GOT AT VOUR FOOD AND CLOTHING!".: :K';2) 

^A(2)-RND';20) ;R(4)=R(4)-RND(10> ;GOSUB2290;GOTO16i6 

1576 PRINTe7eS, "NICE SHOOTIN' PRRDNER ~ 

THEV DIDN'T GET RNVTHING!", :QOSUB2290:GOTui6i0 

1536 IF RK61PRINTL-768, "FRIENDLV INDIRI6 HELP VOU FIND MORE FMi 
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. "; :GOSUe2290;fi(2)=fl(2)+RND(i0):GOTO16ie 

1590 IF R1<66PRINTC'?68, "HfllL STORM - 

YOUR OXEN BRE INJURED AND YOUR WAGON DAMAGED i"i ;G0SUB2348;G0SUB2 

290:A(l)=A(i)-RI>ID(ie);A(5)=fl(5)-RND<16);QOTO1610 

1609 GOTO1620 

1616 F4=l 

1620 IFf1>900 GOTO 1649 

1630 IF Rl>?6PRINTe832. "HEAVY RAIN - 

YOU MUST STOP AND WAIT IT fflJT. "; :GOSUe2340:GOSUB22y6:N=l1-10-Rf*( 

26) : A(5)=A(5>-Rr€)(10) :Fi=l 

1635 ■• 

** ILLNESS +* 
1640 IF E=3 AND RNE'dOOXO GOTO 1678 
1650 IF E=2 fit* RND(100)<20 GOTO 1670 
1660 IF E^l At© RNDa66)<26 GOTO 1670 :ELSE GOTO 1746 
1670 G0SUB2356 

1680 IF RND';9)<';2[E)+1 GOTO 1710 
1690 IF RND(10)<';2[E)+1 GOTO 1720 
1700 PRINT(?768, "SERIOUS ILLNESS - 

'm MUST STOP TO SEE A DCCTOR!". :GOSUB?296;M=M-30;A(5)=fi(:5)-10:A 
(6>=ft';6)-20:IF A(6X0 GOTO 1970 ELSE GOTO 1736 
1710 PRINTe768. "MILD SICKNESS - MEDICI(€ USED. "> : G0SUB2296 : M=M- 
5:A(5)-H(5)-5;GOTO1730 
1720 PRINT@768, "VERY BAD ILLNESS ~ 
YOU MUST STOP AND RECOVER. ", ;GOSLiB2290:M=M-20:A(5)=fl(5)-16 
1738 IF A(5)<0 GOTO 1988 
173;. •• 

*+ MOUNTAINS ♦* 
1740 IF rKi050 GOTO 368 • 

1750 IF F4=l CL£.PRIHTCi478.H$i ;GOSUB2260:F4=0;ELSE G0SUB2356 
1768 R1=RND(10) 

1770 IF Ri<5PRINT@2L "*++ RUGGED I'lOUNTIANS **■*", ;A(i)=A(l)-R 
ND(5>;ELSE GOTO 1856 
1780 IF Rl^lPRINTi?76& "YOU GOT LOST ~ 

YOU LOSE A DAY TRYING TO FIND THE TRAILl". :QOSUB2296;M^M-45;Q0TO 
1850 

1730 IF Rl=2PRINTe6yS.. " ", ;PRINT@763, "WAGON BREAKS DOWN ~ 
VOU nUST USE SUPPLIES TO FIX IT. ", ;GOSUB2290:M=M-l!:r-RND(20>:A(5) 
=A';5)-5;G0T01856 
1806 IF Ri=3F'RINT@768> "STEEP TRAILS SLOW YOU DOtJN. ", ; GOSUB2290 ; fl 

49 



-t^20-lM)(2e).GuTO1858 

1818 PRINT(??68, " BRRi^RRRRiy^ ! ! ! 

*** Ca.D WEATHER **+ 
VOU"j:IF fl(4)<2ePRINT" DON'T"; 
1820 PRINT" HftVE ENOUGH CLOTHING. ". ;GOSUB2290 
1820 IF fi(4)<20 GOSUB2250;PRIHTe768/'VOU M) VOUR FflMILV FREEZE 
TO DEATH I!". ;GOSUB2290:GOTO2020 
1845 ' 

** SNOW? *♦ 
1850 IF F2=8 AND RND(1S)G THEN F2=l;G0T0i92e 
I860 IF \Mi7m AND RI©(10)<8 GOTO 1918 
1870 IF RND(16)G GOTO 1916 

1880 PRINT@?68; " VOU tWE IT THROUGH "i ;IF F2=6PRINT"5 
OUTH ", :ELSEPRINT"THE "> 
1896 PRINT "PASS 

*** NO SNOW ***".; GOSUB2290;F2=1;GOTO268 
1900 GOTO 360 

1916 IFF2=1ANDRND(16)<11-TGOTO360 
1920 PRINTM.CCIi ;PRINTe768. "SNOW IN MOUNTAIN PASS - 
TIME AND SUPPLIES LOST. ", ;FORX=lTu600;XX=RND(12b);VV=RND(32):SET 
(»':.W):NEXTX 

1930QOSUB2296:fl(l)=A(l)-5:A(2)=A(2)-5;A(5)=A(5)-RND(10):l1=n-46- 
RND(46) 

1940 IF A(4)<26QOSUB2350;PRINTe768/'VOU DON'T HAVE ENOUGH WARN C 
LOTHING - 

VOU m VOUR FAMILV FRIEZE TO DEATH!"; ;GOSUB2290;GOTO2020 
1950 GOTO 360 
i9;:.5 ' 

*+ DVIHG +* 
I960 GOSUB2350;PRINTe768>"VOU RAN OUT OF FOOD AND STARVED TO Otfi 
TH". :GOTO2620 

1970 GOSUB2350:T=6;PRINTe768, "VOU CAN'T AFFORD H DCCTOR 
VOU DIED FROM LACK OF tlEDlCAL HiTENTION. ", .GuSUB2298;GOTO1980 
1986 G0SUB2S56;PRINTe768, '^VUU RAN OUT OF MEDICAL SUPPLIES. 
Vai DIED OF "i 
1990 IF F3=l GOTO 2616 
20C16 PRINT"Pf€UMONiA. ". :GOTO2026 
2810 PRINT" INJURIES"; 
2026 G0SUB2296:CLS 

50 



2646 PRINT ;PRIHT"HaiD VOJ LIKE fi FflNCY FUNERfiL"; ;INPUTC* 

2650 PRINT :PRINT"HClULD 'VOU LIKE US TO WORM VO* NEXT (F KIN"; : 

IffUTC* 

2668 IF LEFT$(C$.i)="N" THEN 2686 

2676 PRINT :PRINT"THflT WILL BE $. 56 FOR THE TELEGRAPH CWRQE. " 

2086 G0SUB2296:PRINT:PRINT"S0RRV VOU DIDN'T MflKE IT TO OREGON. 

BETTER LUCK NEXT TIME. " 

2090 INF'UT" 

PRESS ENTER FOR fl \m Qfll1E",Q$:RUN 

2106 ' 

2105 ' 

** SUCCESS ++ 
2110 6OSUB2i50:PRINTe768,"VOU FimLLV ARRIVED AT OREGON CITV 
AFTER ";t1/' LONG MILES — HOOFflV!!!". 
2120 GOSUB2290;QOSUE!2256:PRINTe768/' *** CONGRATULATIONS 

2130 GOSUB2290:GOSUB2250;PRINTCi768,"WE WISH VOU fl GuO[) LIFE 

IN VOUR NEW HOME. ".: INPUT" 

PRESS EtflER FOR H NEW GAME", Q$: RUN 

2125 ■■■ 

** SHOOTING ++ 
2140 CLS 

2156 FOR X=6T026STEP8:Y=PJC";4);Z=RND(4):PRINT@64+X+V*64,T$, :PRIN 
T@99+X+Z*64>T$. ;f€XTX 

2160 Z-RND(500> : FQRX-1T02 ; NEXTX : PRINT(?47i £$, 
2170 fil$=" " : R$^"BRNGBLHMWHflHPOW I " ; R=';PJC'(4)-i)+4+l 
2136 PRINTe20, "TVPE ". t11D$(R$, R. 4), " ".i 
2190 FOR TT=1TO50+S 
2206 A$=ItfiV$ 
2216 IF R$=^"" G0T02256 
2226 IFfi$=CHR$'32> GOTO2270 
2220 PRINTAIi 
2246 Al$=Ai$+A$ 
2256 NEXTTT 

2260 PRINT0768, "SORRV ~ Vai WHERE TW SLOi-J", ;GOaiB2290;X=4;RETU 
RN 

2270 IFA1$0MIW';R$,R.4)PRINT(?76S,CC$, :PRINTC^76S, "VOU MISSED", :G 
0SUB2296;X-5:RETUPJJ 
2288 X=6: RETURN 
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2285 

♦* UNTILITIES ♦♦ 
22^ F0RTL=1T01666:NEXTTL; RETURN 
2360 PRINTe478, W$i 

2318 IFtt>=950PRINTC'256,MT$(l)i ;PRINTe448,MT*(2)j 
2320 IFIK550 iW F=iPRINTGi387. T$; :PRINTe335,T$; 
2338 RETURN 

2346 FORZ=1TO350 : X=RND(126> : V=RND(30) ; SET(ft, V) ; SET (X. V+1) : SET (X, 
Y+2);(€XT: RETURN 

2350 PRIHTC'768,CC$.CC$,CC;*iCW. :RETURN 
2360 PRINTC'256,I1T$(1), :PRINT@448,I1T$(2). : RETURN 
5000 WI-5TRING$(lLi28)+CHR$(172)+CHR$(i72)+CHR*(188)+CHR$(188)+ 
CHR*(156)+CHR$(188)+CHR$';i88)+CHR$(156)+STRING$(3.138)+CHRI(172) 
+CHR*(i88)+CHR$(188)+CHR$(156)+CHPJ(i88)+CHR$(188)+CHR$(156)+CHR 
1(156) 

5616 W$=W*+CHR$(26)+STRING*(31, 24) 

5620 WI4]$+CHRI C160)+STRING$(12. 128)+CHR$(i37)+CHR$(i87)+CHR$(i5 
i)+CHR$(18i)+CHR$(lyl)+CHRI(19i)+CHR$(13i)+STRING$(3,191)+CHR$(l 
86)+CHR$(lyl)+CHR$ayl)+CHR$a81)+CHRI(191)+CHRI(133)+CHR$a56)+ 
CH<$(12S) 

5030 W$=W$+CHR$(26)+STRING$(36. 24) 

5040 W$4J$+CHR$(143)+CHR$(iiSi)+STRING$(6>191)+L:HRI(189)+CHRI(i60 
)+CHR*(160)+CHR$(176)+CHR$(147)+CHR$(184)+L;HR$(134)+CHR$(i3i)+CH 
R$';137)+CHR$(lS6)+CHRI(160)+STRING$(3il76)+CHR$a60)+CHR$(156)+C 
HR$(131)+CHR$(131)+CHR$(172)+CHR$(144) 
5650 W$-WI+CHR$(i43)+C:HR$';i28) 
5660 WI-=W$+CHRf (26)+STRING$(30, 24) 

5070 UJ=M$+STRINGI<ii28)+CHR$(i38)+CHR$(129)+CHRI<128)+CHR$(128 
)+CHR$(i28)+CHRI(i30)+CHR$(i35)+STRINQ$C4,128)+CHR$(lS0)+CHR*(i3 
7)+L:HR$(140)+CHR$(iS4)+CHR$(129)+STRING$!:5ri2S)+C;HR$(131)+CHR$(l 
46)+CHR*(140)+C:HR$(lil)+STRING$(il28) 

5680 T$=CHR$<12e)+CHRI(176)+CHR$(156)+CHRia88)+CHR$(i52>+CHR$(i 
80)+CHR$(156)+CHR$';i44)+CHR$(128)+CHR$(26)+STRlNGJ(9.24)+CHR$(17 
0)+CHR$(i77)+CHR$(173)+CHRf(l49)+CHR*(lS?)+CHRI(185)+CHRI(i67)+L: 
HR*(191)+CHR$(i32) 

5690 T$=^T$+CHR*(26)+STRING*(9.24)+CHR*(128)+CHR$(130)+CHR$(i4i)+ 
CHR$(lS7)+CHR$a81)+CHR$(i4i)+C:KR$';i35)+CHR$(i29)+CHR$Ci28)+CHR* 
t;26)+STRING*(:9,24)+STRING*(3,128)+CHRia76)+CHR*(i49)+STRIN6$(4. 
128) 
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5100 T$=T$+CHR$(26)+STRINGI(9. 24)+CHR$(128)+CHR$(128)+CHR*(i60)+ 

CHR$(186)+CHR$(181)+CW?$(144) 

5110 E$=STRING$(2. 128)+CHR$(160)+STRING$(6, 128)+CHR$(26)+STRING* 

(9. 24)+CHR$(130)+CHR$(121)+CHR'$(189)+STRING$(5, 188)+CHR$(148)+CH 

RI(26)+STRINGI(9> 24)+STRINGI(2. i28)+CHR$(li8>+CHR$(129)+STRINU$( 

2. 128)+CHR$(129)+CHR$(129) 

5i-26 SR*=CHR*(156)+CHR$(14i)+C:HR$(158>+CHR$(129) 

5120 LR$=CHR$(160)+CHRI(176)+CHRt(141)+CHR$(176)+CHR$(134)+CHR$( 

146)+CHR$(26)+STRING$(6,24)+CHR$(178)+CHRI(lil)+CHR*(129)+CHR*<l 

31>+CHR$(151)+CHR$(128) 

5140 F$=CHR$(Ob)+CHR$(188)+CHR$(i22)+CHR$(128)+CHR$(16e)+STRING 

I(il76)+CHR$(144)+CHR$(128)+CHRI(128)+CHR$';172)+CHR$(156)+C;HR$( 

26)+STRING$(ll 24)+CHR$(128)+STRIMG$(4. 191)+STRIHG$<2, 18S)+STRIN 

G$(4.191)+CHR$(149) 

5150 nT$(l)=STRIN6$(l 128)+CHR$(184)+CHR$';i44)+STRINGI(2, 128)+CH 

R$(i84)+CHR$(189)+CHR$(i44>+STRING$<2,i28)+CHR*(144)+STRING$<10> 

128)+CHR$(2b)+STRING$(25. 24) 

5160 MT$(l)=MT$(l)+CHR$(i2S)+L:HR$a60)+CHR$(142)+CHR$(155)+CHR$( 

191)+CHRt(164)+CHR$(lb0)+CHR$(l?4)+CHR$(191)+CHR$(i75)+CHR$(iyl) 

+CHR$<164>+CHR$(166)+CHR$(156)+CHRI<i67)+CHR$(130)+STRING$(9.l28 

)+CHR$(26)+STRING$(25.24) 

5170 t1T$(l>=t1T$';i)+CHR$(126)+CHR$';i23)+STRING$(2,128)+C:HRf(152)+ 

CHR$(123)+CHR$(128)+CHR$(121)+CHR*(128)+CHRI(129)+CHRI';i28)+CHR$ 

(;i37)+CHR*(144)+CHRt(123)+CH<$a29)+CHR$';i27)+CHR$(144)+CHR$(128 

)+CHR$C134)+CHRI<189)+CHR$(i44)+STRlNG$(1128) 

5180 MT$(2)=STRING$(2, 128;+CHR$a66)+CHRi(ii4)+STRINGI(8. 128)+CH 

R$<126)+CHR$(164)+CHR$(128>+CHR$(128)+CHR$(162)+CHRI(124)+CHR$(1 

26)+CHR$(;i28)+C:HR$<;126)+CHR$(lb4)+STRiMG$(2.128)+C;HR$(26)+STRING 

$(25.24) 

5190 HT$(2)=MT$<2)+STRING$';2.i28)+CHR$(152)+CHR$(129)+STRING$';il 

.128)+CHR$(127)+CHR$(152)+CHR$a25)+STRING$(5.i28)+L:HR$(127)+CHR 

$(i44>+UHR$(26)+STRING$(25. 24) 

5200 HT$(2)=l1T*(2)+CHR$(128)+CHR$(li0)+STRIfW$(i2,128)+CHRI(ii0) 

+STRiriG$(8, 128)+CHR$<120) 

5210 l-iT$(l)=CHR$(59>+CHRI<44)+CHRl';46);WTJ(2)=CHR$(44)+CHR$(4b;H 

CHR*(59) 

5220 WI=CHR$a56)+CHRia72>+CHR$';i22) 

5226 RETURf^ 
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Bv Lev«l IV 






uuuMiy yuM num. id ueiense 0{ me 

empire, you roolly {tttyosrj^tt 

against superior forces, 1 

_Jliance and daring, butt 

added knowledge that every 

enemy sliip you down means your 

coffers swell - and you arc also^ 

\ businessman! . 

This superb game features thr§ 

levels of play; fast, machine la 

guage graphics; real-time inptj 

and "smart" enemy stifps Ihi 

move and shoot! Good tiuntinf 

and watch out for ther^adiatiott 

belts! Ava ilable on LewaHl 16K 

Tapew32K Disk. 

Tapa -^514 93 
:ilDi5k-St9 95 
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Lance Micklus' 
ST80-the Smart 
Terminal Program- 
just got SMARTER! ! 



ST80D contains extensions for disk 
drive systems to exchange files with a 
timesharing computer or another TRS-80. 



USING ST80D, your TRS-80 can do all this and more: 

Gather and pre-format data, store it on disk, then 
transmit it to a timesharing computer for processing. 
Processed data from the timesharing computer can 
then be sent back to the TRS-80. 

One TRS-80 can generate a data base and share it with 
another TRS-80 thousands of miles away by telephone. 

Users may customize their terminal program by 
redefining the translation tables. Conversion from one 
set of tables to another takes only seconds. 

Auto logon feature sends your account name, number 
and password upon request. 

ST80D can transmit any type of TRS-80 ASCII file, 
including BASIC programs stored in ASCII format, and 
most BASIC data files. Binary files can also be 
transmitted from one TRS-80 to another, allowing even 
machine language programs to be sent over the phone. 

ST80D is a practical, full-feature terminal program that 
has been used on a variety of timesharing systems. 

These include IBM 370, Honeywell Sigma/6, Harris/7, 
DECSYSTEM 20, Dartmouth Timesharing, CDC Cyber 
and HP 2000. 

If you're looking for a professional quality product, 
not an amateur program, then order ST80D today! 



For32K 
disk systems 
$79.95 




T|C TRS-60 lofluicire CKchonoe 



STRANGE 
ODYSSEY 



^xVERSEe^, 



^ 




TRS-80 Software 
Exchange 

6 South street 
Mlltord.NH 03055 
(603)673-5144 



One of SCOTT ADAMS newest adventures 



Your spaceship has crashed on an uncharted planetoid. 

The challenge is yours ... to explore the exciting 

dimensions of deep space. Step through that 

shimmering curtain of light that spans the universe. 

for$14.95Levelll, 16K 




An Adventure 
by Scott Adams 



The lure of a Fun House is the unexpected when 
you least expect It, and this adventure Is true to 
tradition. It takes all your Ingenuity just to get past 
the ticket counter, so prepare yourself for many 
thrilling and challenging hours In Scott Adam's Fun 
House! $14.95, Levelll,16K 




TRS-80 SOFTWARE EXCHANGE 

6 South Street, Milford, NH 03055(603)673-5144 
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^ /STEM 
CO?Y 



by Kalman Bergen 



At last! A program which 
allows you to make backup 
copies of object ("system") 
tapes. No more worrying that 
a dropout will send you 'back to the Shack' for a new 
editor-assembler or chess program. Features include copy, 
verify read, rename, and verify write. No knowledge of machine 
language required, soorder yours today! 

For 16K, Level II -$9.95 



TRS-80 Software Exchange 




CLCCTRK 
PCn<IL ! 

Effortless typii^ is tere! 



The Electric Pencil by Michael Shrayer 
Is a true word-processing program for 
the TRS-80. Enter your manuscript, 
and let your computer do the work. 
Editing? Just position the cursor with the 
arrow keys . . . one-key commands let you 
change, delete, or insert. Fully 
adjustable margins, left/ right justifica- 
tion, variable spacing, page headings, 
and much morel Save and recall your text with tape or 
diskfiles. Typing everything 

from letters to reports is fast and Level II, 16K tape -$100.00 
incredibly easy using The Disk version -$150.00 
Electric Pencil. 
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(603)673-5144 
eSouthSt., Mllford, NH 



Recommended for 
Small Businesses 



Small 
Business 

BookkeeplW 



Based on the well- 
known Dome Book- 
keeping System. Posts 
expenses to as many as 42 
accounts (which you ma^ 
customize). Produces video \ 
and line printer reports for — 

year to last week, this week, year to date; 
supports cash system of accounting; 
stores data on disk for fast retrieval. 

TRS-80 SOFTWARE EXCHANGE 

P.O. BOX 68, MILFORD, NH 03055 




by Miller Microcomputer Services 
and Roger W. Robitaille, Sr. 



Available for 32K 
Disk Systems - $24.95 



PERIODICAL 
CROSS-REFERENCE 



by Dave Stambaugh 



YOU DON'T HAVE TO BE A LIBRARIAN 

Every professional or serious hobbyist who 
relies on current literature to update his/ 
her knowledge can benefit from this pro- 
gram. Build a file using any subjects or 
publications you like (18 per file). Allows 
you to add, delete, edit; search by sub- 
ject or publication; list on CRT or line 
printer all or selected entries. SAVE, LOAD with 
both tape and disk versions. 

Level II, 16K S14.95 - Disk $19.95. 

TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 
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x-iuinii II 



by Chris Freund 



For the thousands 
who have enjoyed 
X-Wing Fighter, 
X-Wing II presents 
a totally new element 
in the game! 



'^W^- 




m) 



^ J where \-V\'ing I lelt Dcilh Slar 

loomini; on the screen, X-Wing II lets \()lj ^Liicie your 
liqhter into the tremli, lind the exhaust |)ort, aim ancJ 
tire — till the \\hile cUoicJin^ eneni\ lighters. 1 xcellent 
i^raphics, ]2 levels ol ()la\ , and extensive INK1>S 
(oniniands make this one ol our most exeitinii 



I'tMl-time yann's. 



Level II, 16K 




Written by the author of your Level I Users Manual, LEARNING 
LEVEL II picks right up where the Level I Manual leaves off. It also 
supplies the changes needed to nnake the Level I Manual compatible 
writh your Level II TRS-80. 

LEARNING LEVEL II covers all Level II BASIC beyond Level I, plus 
much more. It shows you how to use the Editor, explains what the 
many error messages are really saying, and leads you thru conver- 
sions of Level I programs to Level II. 

Dual cassettes, printers, the Expansion Interface with clock and 
other features are explained in the same easy-to-learn style that 
made the Level I Manual famous. LEARNING LEVEL II was created 
specifically for your Level II TRS-80! 



Yes, I want to really learn how to use Level 



II 



Please send copies of 

LEARNING LEVEL II. My check for J15.95 -f 
$1.45 P & H Is enclosed. (CA addresses add 
6% sales tax). 



Name 

Address _ 

City 

State 
Zip Code 



I understand my order will be shipped 
promptly and there Is a 30 day money-back 
guarantee. ^ gg 



'(soft cover) 



.TRS-80 

• SOFTWARE 6 SOUTH street 
EXCHANGE milford, nh 03055 
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1ki90*IUQf 




This most ancient of games may be older than mankind itself, con- 
sidering that all it takes, in its most basic form, is two sets of teeth 
and a length of vine, bone, stick, or whatever. Early players could 
hardly have imagined that in several milennia their favorite pastime 
would be played by strange, hairless, upright creatures who, instead 
of a length of vine, use a thinking machine which flashes messages 
of light. One wonders. In an age several milennia hence, will Tug of 
War be played in Galactic Olympics in outer space, or in an earth 
cave, with a length of vine and two sets of teeth? One player uses the 
Q, W and E keys, the other P, and I. The screen displays the 'rope' 
and center line. Pressing any of your keys moves the 'rope' in your 
direction; pressing a wrong key benefits your opponent. The faster 
player wins the tug. The game is over when the center mark on the 
'rope' slips over the line. 

10 M=e:N=e:CL'5:RftNDnM:'*TLIG OF l-lflR J. R. DUCHEK.JflX.FLR, 790629 * 
20 INF'1JT"W0UL[:' VOU LIKE INSTRUCTIONS"; ftl 

39 CLS:IF fl*="V"GOTO5000 

25 F0RJ=lT02:INPLIT"PLflVER NhHE".: F*(J>:NEXT 
27 CLS 

40 FORX=0TO127 : SET(X. 22) : NEXT 

50 FURV=0TU47STEP2 : SET(9.. V> ; SETdlS, V) ; NEXT 

60 W=62;RE'5ET':W.22) 

65 PRINTe906> F$(l) :F'RINTli'329. F$(2) 

70 e=RND(2):C=FMK3) 
80 1FB=1B$="Q" 
90 IFC.=1C*="P" 

100 IFB=2B$="W" 
110 IFC.=2C*="0" 

120 IFB=2B$="E" 
120 IFC=2C$="I" 
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288 PRINT88iBS:PRINT855,C$ 
228 E$=INKEV$ 
238 IFE*=""G0T022e 
248 1FE*=B*0RE*=C$G0T0388 

388 IFE$=B$ SET(H,23):M=M-2:RESET<W,22);Q0T0318 
ass IFE$="Q"(KE*="W"ORE$="E"SET(M, 23) :W=W+2: RESET (W, 23) 
318 IFE$=CI SET(H, 23) : W=M+2 : RESEKW, 23) : 0070329 
315 IFE$="P"ORE*="0"ORE$=" T'SEKM, 23) : W=W-2 : RESETCW, 23) 
328 IFW<=9THENCLS:PRlNTCrt?$(23):FORI=lTO10:PRINTF$<l);", VOU'RE 
THE WINNER ! ! ! " : NEXT : M=M+1 : GOTO600 

330 IFW>=li8THENaS:PRINTCHR$(23):FORl=lTO10:PRINTF$(2)i", VOU'R 
E THE WINNER!!!": NEXT :N=N+1:60T06M 
340 GOTO70 
515 PRINT 

608 PRINTF$(1)J" HAS WON ";M; " TUGS OF WAR AND "iF$(2);" HFiS WON 
"jN;" TUGS OF WFIR !!!" 

605 INPUT"WOULD VOU LIKE TO PLflV fiGfiIN"j fi$ 
610 IFfl$="V"CLS:GOTO40 
620 £W 

5000 PRINT" THIS IS THE GAME OF TUG OF WAR. THE OBJECT IS TO 
PULL 
K10 PRINT"THE CENTER MARK ON THE ROPE OVER THE DOTTED LINE. 

5020 PRINT"DURING THE GWE VOU CAN CSSERVE THE PROPER KEV TO 'TU 

G' 

5030 PRINT"TO PULL THE ROPE AT Tl€ TOP OF VOUR SIDE OF THE SCREE 

N. 

5035 PRINT 

5040 PRINT"THE PLAVER ON THE LEFT MUST HIT (iW OR E AS INDIC- 
5660 PRINT"ATED TO MOVE THE ROPE. THE PLAVER ON THE RIGHT MUST 

HIT 

^60 PRINT"P. OR I AS INDICATED TO MOVE THE ROPE. THE FASTER 

5070 PRINT"PLAVER WINS THE 'TUG'. 

5080 PRINT 

5090 PRINT" IF VOU PRESS THE WRONG KEV (THE BOARD SAVS 'Q' B 

UT VOU 

5188 PRINT"PffiSS 'E' FOR EXAMPLE) Tt£ OTHER PLAVER IS AWARDED TH 

E TUG. 

5105 INPUT"Wt£N READV HIT ENTER"; Z 

5118 aS:G0T035 
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OK 

ax. 

OK 
OK 
OK 
OK 
OK 
OK 
OK 

OK D/Aw 

OK 
OK 

OK 
OK 



OK 
OK 
OK 
OK 
OK 
OK 
OK 
OK 
OK 
OK 



Introducing... 

MMSFQRTH 



THE LATEST IN A HIGH-LEVEL LANGUAGE SOFTWARE 
DEVELOPMENT SYSTEM. 

MMSFORTH is a new version of the powerful, fast, and 
structured FORTH language, specifically written for the 
TRS-80, and offers such features as: 



OK • Double precision integer math 

OK • Reverse polish notation 

OK • Blinking cursor, auto-repeat keyboard 

q[^ • Virtual Memory! 

OK • Editing capabilities similar to Level II 

OK • Supports Z-80 assembly blocks within the FORTH 

"K structure 

MMSFORTH Is available in two versions; a complete version for 
disk systems and a close approximation to that version which is 
designed for the Level II, 16K tape system. The disk version 
offers "virtual memory", supports one to four disk drives, does 
not require any other disk operating system, and also has both 
o: disk and tape input/output capabilities. 

or 

TAKE ADVANTAGE OF A POWERFUL STRUCTURED 
LANGUAGE WITH THE EXECUTION SPEED OF A 

o COMPILER. 

OK MMSFOR IH is available now from TSE. 

OK 
OK 
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The MMSFORTH syUem diskette or 
cassette tape provides for the expansion of 
FORTH commands by the user. There are 
many programs and routines provided as 
examples of FORTH programming, such as: 

Routines For: Programs For: 

String Handling Game of Life 

Graphics Checkbook Balancing 

File Sorting String Sort 

Screen Printing Number Guessing Game 

The TRS-80 Software Exchange intends to fully support the 
Introduction of MMSFORTH with the development of 
supporting application modules. Early MMSFORTH projects 
are: 

floating-point package • 

assembler/cross compiler to provide • 

standard TRS-80 load modules 

large flexible mailing list system • 

generalized data base management system • 

word-processing package (FORTHWRITE) • 



MMSFORTH, by Miller Microcomputer Services, includes 
introductory documentation with further references to the 
MicroFORTH primer of FORTH, Inc. This manual is an 
invaluable reference for the FORTH programmer, and can be 
purchased separately by anyone desiring more information on 
the FORTH language structure. 

30-DAY INTRODUCTORY PRICE 

MMSFORTH cassette version. Level II, 16K $34.95 

MMSFORTH disk version. Level II, 16K 65 00 

MicroFORTH primer 15.00 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 
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GAMl 



iSlB^^^ARDWARE BUSINESS 



E ACCESSORIES 

PERSONAL 



PERSONAL SPECIAL PURF 



'ARE ACCESSORIES 



BOOK 
GAMES P 



HARDWAB ^ 
GAMES PER 

SPECIAL PURPO; 







GAMES PERSONAL 
ACCESSORIES 

Warfare I 4-game anthology, Le- 
vel II, 16K $7.95 
Backgammon by Scott Adams 
Level il,16K$7.95 

X-Wing Fighter II by Chris 
Freund Level II, 16K $9.95 
Taipan by Art Canfil - Level II, 
16K $9.95. 

Cribbage by Roger W. Robitaille, 
Sr. Levellorll,16K$7.95 
Sargon Chess by Dan & Kathe 
Spracklen Level II, 16K $19.95 
Chess Companion by Michael 
Keileher Level II, 16K $7.95 
Three D Tic Tac Toe by Scott 
Adams Level I or II, 16K $7.95 
Concentration by Lance Micklus 
Level I or II, 16K $7.95 
Amazin' Mazes by Robt. Wallace 
Level II, 16K $7.95 
Time Bomb by David Bohike 
Level I or II, 16K $4.95 
Balloon Race by Dean Powell, 
Level II, 16K, $9.95 



ACCESSORIES 

ESSORIES 
WARE ACCESSORIES 

PERSONAL 
HARDWARE ACCESSORIES 
SPECIAL PURPOSE 



Snake Eggs with sound by Leo 

Christopherson Level II, 16K 

$14.95 

Life Two by Leo Christopherson 

with Sound, Level II, 16K $14.95 

Android Nim with sound by Leo 

Christopherson Level II, 16K 

$14.95 

Cubes by Leo Christopherson 

Level II, 16K$9.95 

Mastermind II by Lance Micklus 

$7.95 

Mastermind II source list $20.00 

Robot/Breakaway Game duo by 

Lance Micklus Level II, 4K $7.95 

Tycoon by David BohIke Level II, 

16K$7.95 

Slalom by Denslo Hamlin Level 

ll,16K$7.95 

9 Games for Preschool Children 

by George Blank Level II, 16K 

$9.95 

Ten Pin by Frank B. Rowlett, Jr. 

Level II, 16K $7.95 

All Star Baseball by David 

Bohike, Level II, 16K $7.95 
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End Zone by R. W. Robitaille, Sr. 

Level I or II, 16K $7.95 

Atlantic Balloon Crossing by 

Dean Powell Level II, 16KSpecial 
price, $9.95 

Space Battles by Level iV, Level 
II, 16K Tape or 32K Disk, Tape - 
$14.95, Disk - $19.95 

Star Trek III. 3 by Lance Micklus 
Level 11, 16K $14.95 
Dog Star Adventure by Lance 
Micklus Level II, 16K $9.95 
Adventures on tape by Scott 
Adams Level II, 16K Choose one: 
Adventureland, Pirate's Cove, 
Mission Impossible, The Count, 
Voodoo Castle, $14.95. 
Adventures on disk by Scott 

Adams. Pirates Cove plus Adven- 
tureland, or The Count plus 
Voodoo Castle for 32K disk 
system $24.95, 

Now in machine language for 
faster and easier response. 

Safari by David Bohike Level II, 
16K$7.95 

Treasure Hunt by Lance Micklus 
Level I or II, 16K $7.95 
'Round the Horn by George 
Blank Level ll,16K$9.95 
Pork Barrel by George Blank 
Level II, 16K$9.95 
Kamikaze by Russell Starkey 
Level II, 16K$7.95 
All Star Baseball by David Bohike 
Level ll,16K$7.95 
Air Raid by Small System Soft- 
ware Level I or II, 4K $14.95 
Barricade by Small Systems 
Software. Machine language - 
$14.95. 

Journey To The Center Of The 
Earth by Greg Hassett. Level II, 
16K Tape $7.95. 

Pentominoes by Solomon W. 
Golomb. Level II, 16K - $9.95. 



inventory 2.2 by M. Keileher and 
R.W. Robitaille, Sr. 16K disk 
systems $59.95 

Inventory System 2.3 by M. 

Keileher. Improved version, 

$79.95 

Inventory 'S' by BUS-80 Level II, 

16K Tape - $24.95; 32K Disk - 

$39.95 

Payroll by Stephen Hebbler for 
disk systems 32K $59.95 
Accounts Receivable II by S. 
Hebbler 32K disk systems $79.95 
Appointment Log by Michael 
Keileher Level ll,16K$9.95 

General Ledger I by M. Keileher, 
requires 32K Disk, $79.95 
Mail List II by BUS-80 32K disk 
systems $99.95 

Small Business Bookkeeping by 
R.W. Robitaille, Sr. Level I, 4K 
or Level II, 16K with journal 
$22.00; without journal $15.00 
Small Business Bookkeeping for 
Disk by Miller Microcomputer 
Services and Roger W. Robi- 
taille, Sr., 32K Disk. With 
Journal $31.95; without journal 
$24.95 
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Calculator by R.W. Robitaille, Sr. 

Level I or II, 4K $2.95 

Moving Signboard by Circle 

Enterprises Level I or II, 4K 

$9.95 

Histograph/Scattergram by Gary 

S. Breschini. Level II, 16K $9.95. 

Simple Simon by George Blank. 

Level II. Written in BASIC. $4.95 

Math Drill by K.L. Brown Level 
II, 16K$4.95 
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RPN Calculator by Russell Star- 
key Level II, 16K$9.95 
Ham Radio by Michael Kelleher 
Level II, 16K$9.95 
Ham Radio ARS 1.1 for 32K disk 
$24.95 

Electronics Assistant by John 
Adamson Level II, 16K $9.95 
Preflight by Stephen Hebbler 
Level II, 16K $20.00 
Basic Statistics by Steve Relsser 
Level II, 16K $20.00 
Drill Masters by Computer 
Graphics — specify title desired 
Level II, 16K $7.95 EACH: 
German, Chinese, Russian, Ital- 
ian, Spanish, or Music Theory. 
Keyboard-80 by John Adamson, 
Level II, 16K$9.95 
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Typing Tutor by 80 US. Level II, 
16K -$19.95 

Secrets of the Tarot by John T. 
Phillipp. Level II16K $9.95. 

Biorhythms by Frank B. Rowlett, 
Jr. Level I or II, 4K $4.95 
Personal Finance by Lance Mick- 
lus. Level ll,16K$9.95 
Advanced Personal Finance by 
Lance Micklus For 32K disk 
systems $24.95 

Home Financial Management by 
Michael Kelleher Level II, 16K 
$9.95 



UTILITIES 

NEWDOS by Apparat $49.95 
NEWDOS-h by Apparat $99.95 
Three Monitors for Disk by Small 
Systems Software Disk for 16 
through 48K (all on one) $29.95 
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KVP Extender by Lance Micklus 

Tape, $24.95 Disk, $29.95 

KVP 232 by Lance Micklus - KVP 

adapted for the TRS-232. 

Tape $24.95 

ST80 Smart Terminal Level II, 

16K $49.95 

STBOD SMARTER Terminal for 

disk systems $79.95 
Micro Text Editor by Don Coons 
Level ll,4Kor16K$9.95 
TexteO by Frank B. Rowlett, Jr. 
For 32K disk systems $59.95 

8080-Z80 Conversion Level II, 
16K $15.00 

Renumber by Lance Micklus 

Level II, available in 4 through 

48K (specify when ordering) 

$15.00 

Renumber source listing $20.00 

Renumber on Disk all versions on 

diskette $25.00 

Machine Language Monitor by 

Small Systems Software Level I 

or II, 16K $26.95 

Electric Pencil by Michael 
Shrayer. Powerful machine lan- 
guage word processing system. 
Level 11, 16K tape $100; Disk 
version $150. 

Level III BASIC by Microsoft. 
$49.95. 

Level I In Level II by Apparat. 
Level II, 16K - $15.00. 



For more detailed descriptions 
of our TRS-80 software and 
accessories, send for the TSE 
catalog — it's free! Write or 
call today for your copy: 

TRS-80 Software Exchange 
17 Briar Cliff Drive 
Milford,NH 03055 

603-673-5144 



Fortran by Microsoft, 32K, 2 
Disks — new low price $195.00 

MMSForth by Miller Microcom- 
puter Service. Powerful new 
compiled language — cassette 
version, Level 11, 16K - $34.95; 
Disk version. Level II, 16K 
44.95; MicroForth primer $15.00 
System Copy by Kalman Bergen. 
Level II, 16K $9.95. 
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Sargon Handbook by Dan & 
Kathe Spracklen $14.95 plus 
$1.00 shipping 

The BASIC Handbook by Dr. 
David A. Lien $14.95 plus $000 
shipping 

Z80 Instruction Handbook by 
Sceibi Publications $4.95 
The Little Book of BASIC Style by 
John Nevison $5.95 plus $1.00 
shipping 

TRS-80 Assembly Language Pro- 
gramming by William Barden, Jr. 
$3.95 plus $1.00 shipping and 
handling 

Introduction to TRS-80 Graphics 

by Don Inman. $7.95 + $1 S & H. 

Learning Level II by David A. Lien 
$15.95 + $1.00 shipping/handling. 



Strange Odyssey by Scott Adams. 
Level ll,16K $14.95 

Fun Hlouse by Scott Adams. Level 
ll,16K $14.95 
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Cassettes boxes of ten each. 

C-10, $6.50 plus $1.00 shipping; 

C-20, $7.50 plus $1.00 shipping 

Diskettes Dysan, box of 5, $24.95 

plus $1.00 shipping; Verbatim, 

box of 10, $34.95 plus $1.00 

shipping 

Diskette Storage Box $5.00 

TRS 232 by Small Systems 

Hardware — $49.95 

Percom Disk Drives single oi 

dual, for TRS-80's. Single drive, 

$399.00; Dual drive, $799.00; 

Cable (required) $29.95 

Floppy Armour ^'* Protective 

envelope for shipping floppy 

disks, 5-pack - $4.95 plus $1.00 

shipping & handling 

16K Memory Kits by '^^haca 

Audio, 16K RAM's $99.95 



IMPORTANT 
• No sales tax. 

• All C.O.D.'s or special delivery 
orders are a minimum of $5.00 
for special handling. 

• When ordering Percom, please 
add $5. no [each] packaging and 
hand!' =?. 
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SEE US AT THE 
NORTHEAST COMPUTER SHOW 

SEPTEMBER 28-30, 1979 

Hynes Auditorium/Prudential Center 

Boston, MA 

BOOTH CS67 
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PO Box 68 
Milford, NH 03055 

"your BASIC software magazine" 

Rush me the next 12 issues of SoftSide. 



nuSAbulk.$181yr. n$32-2yrs. DCANADA/MEXICO $25 1 yr. 
DUSA first class $25 1 yr. IHOVERSEAS airmail $30 1 yr. 

DAPO/OVERSEAS surface $25 1 yr. Telephone your charge card order! Call 
^^^_ our Subscription office Monday through 

Credit Card i^^^ Friday 9:30 to 5:30 (Eastern time) at 



603-673-5144 



Exp. Date. 
Signature. 



nterbank # (M/C only). 



j Name 



Address- 
City 



- State - 



Zip- 



I Please remit in us funds ONLY | 



Ready to get serious? SUBSCRIBE TO PROG/8b the magazme 

^ dedicated to Serious programmers .beginners to prot^si^Jlsls,' 



/// 



USA 
Bulk mail - $15 00 
First CIdSS Mail - $21 00 
Overseas airmail - $27.00 



SUBSCRIPTION RATES - 6 Issust per year 

Canada 



Mexico 
APO/FPO 



Overseas surface mail 



D ChaekjMoney Ord»| 

SIGNATURE 



In^aMer Charts 




ACCOUNT #_ 
EXP. DATE_ 
NAME 



INTER. # 



ADDRESS _ 
CITY 



STATE 



_ZIP 



Telephone orders accepted for Master Charge or VISA accounts. Call Monday through 
Friday, 9:30 to 5;30 EST at 603-673-5144 

PO BOX 68, MILFORD, NH 03055 
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Turn Your TRS-80 Into an 

Electronic Organ With KEYBOARD-80 

And Any Audio Amplifier! 




KEYBQAFD-SQ 

PIdv your favorites, from Scott Joplin to Paul McCartney, on ; 
full 3-octavp chromatic scale. Although) you can record your 
nuisic for later playback, the unique live keyboard lets you lister 
as you play. Machine language tape for 16K, Level |l IRS-SO. 
by JOS r Associates Level II, 16K Tape - $9.95 

= TRf-eo 

Sefluiofc CKchonge 
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" your BASIC softwars magazine" 
P.O. Box 68, Milford, NH 03055 
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